Número de hojas

Utiliza con VBA, Worksheets.Count para saber el numero de hojas. PAra
tener el nombre de todas las hojas:

Sub nombres()
Dim hoja As Worksheet
For Each hoja In Worksheets
ActiveCell = hoja.Name
ActiveCell.Offset(1, 0).Select
Next
End Sub


Abraham