Obtener el nombre de las pestañas de un libro

Hola! Sergio Eduardo.

a) Inserta una hoja nueva (no tiene importancia el nombre que le pongas a
esta hoja)

b) Haz clic con el botón derecho de tu ratón en la etiqueta de la hoja nueva
y selecciona: Ver código.

c) En la ventana que se te abrirá, copia y pega el siguiente código:
___________________

Sub ListarHojas()
Dim Hj As Worksheet
Application.ScreenUpdating = False
With [a1]
.EntireColumn.ClearContents: .Value = "Hojas"
.Font.Bold = True: .Font.Underline = xlUnderlineStyleSingle
End With
For Each Hj In Sheets
Range("a" & 1 + Hj.Index) = Hj.Name
Next Hj
Application.ScreenUpdating = True
End Sub

___________________


d) Cierra todas las ventanas del ambiente Visual Basic for Application en el
que te encuentras y retorna al Excel.

e) Ejecuta la macro recién incorporada: ListarHojas


Cada vez que agregues o quites hojas de tu libro podrás volver a correr la
macro para -así- obtener una nueva lista.

Espero te sea de utilidad
Saludos, Cacho.

hola, Sergio ! (creo que siguen faltos de sincronia los servidores) :-((

En un libro de excel tengo como 50 pestañas y cada una tiene diferente nombre
como hago para obtener el nombre de cada una de las pestanas

1) asegurate que la hoja para el resumen sea la primera en el orden (o
indice) de las hojas en el libro

2) pon algun titulo en la celda A1 de esa hoja (ya lo modificaras segun sea
necesario)
[A1] -> Lista de hojas en el libro

3) define el siguiente nombre (menu: insertar / nombres / definir...)
nombre se refiere a:
Hojas =indicar.libro(1+0*hoy())

4) escribe las siguientes formulas:
[A2]
=elegir(1+(fila()>contara(hojas)),extrae(indice(hojas,fila()),encontrar("]",indice(hojas,1))+1,31),"")

5) copia/arrastra/... la formula de A2 n_filas hacia abajo (segun hojas
existan o necesites dejar preparadas)

solo toma en cuenta que mi sistema usa como separador de argumentos a la
coma ',' NO al punto y coma ';' :D
y... si tu excel es en ingles, modifica la formula del nombre (Hojas)...
de -> =indicar.libro(1+0*hoy())
a -> =get.workbook(1+0*now())

saludos,
hector.

Hola:Si lo que quieres es ver todos los nombres de las pestañas para
seleccionar una, Pulsa boton derecho del raton encima de la barra de
desplazamiento situada a la izquierda de las pestañas.
Espero que te sirva.


"Sergio Eduardo" escribió:

Que tal amigos tengo el siguiente problemilla

En un libro de excel tengo como 50 pestañas y cada una tiene
diferente nombre como hago para obtener el nombre de cada una de las
pestañas

saludos y muchas gracias
.