Obtener números de hojas de libro excel

Necesito ayuda para listar el numero de cada hoja de un libro Excel. Es decir, no es el nombre de la hoja sino el numero que tiene la hoja

Sirva como ejemplo el siguiente. Lo que trato es tener un listado de ambos, nombre y numero de hoja

1 respuesta

Respuesta
2

H o l a:

Te anexo la macro, en la columna A te va a poner el nombre de la hoja, en la B el código de hoja (codeName) y en la columna C el número de secuencia de la hoja, las hojas tienen un número de índice, empieza en el número 1 para la primera hoja, el 2 para la segunda hoja, etc.

Sub NombresHojas()
'Por.Dante Amor
    ActiveSheet.UsedRange.Offset(1, 0).ClearContents
    i = 2
    For Each h In Sheets
        Cells(i, "A") = h.Name
        Cells(i, "B") = h.CodeName
        Cells(i, "C") = h.Index
        i = i + 1
    Next
    MsgBox "Fin"
End Sub

':)
'S aludos. D a n t e   A m o r . R ecuerda valorar la respuesta. G racias
':)

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas