Hojas Excel.

Hola jacn

No se exactamente que es lo que deseas pero prueba con las siguientes
líneas, las cuales pueden darte una mejor idea.

Sub numerar()
Dim i As Integer
Dim hoja As Worksheet
i = 1
For Each hoja In Worksheets
hoja.Name = "Hoja Nº " & i
i = i + 1
Next hoja
End Sub

Espero te sirva

Cordialmente,

Javier García
Bogotá-Colombia
"jacn" escribió en el mensaje
news:

Gracias por responder, pero la duda no es cómo autonumerar las páginas de
cada hoja, sino las hojas que componen el libro. Yo sé que si hago doble
click en la pestaña de la hoja, ésta me permite renombrarla, pero ¿tengo

que

hacer esto con las 140 hojas?, ¿se os ocurre alguna cosa?.

Gracias de antemano y un cordial saludo.