Bucle con nombre de todas las hojas

[Salvador1]

Hola:

Encontré esta macro por la Internet, la cuál se supone que guarda en la variable las páginas que tiene el libro (en este caso: Hoja1, Hoja2 y Hoja3), y luego las inserta en la columna A...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jorgelin]

checa esto haber si te sirve

Sub nombre()

Dim hoja As Integer
hoja = 1
On Error GoTo mal
Do While Sheets(hoja).Name <> ""
Range("a" & hoja).Value = Sheets(hoja).Name
hoja = hoja + 1
Loop
mal...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Salvador1]

Hola (con un "poco" de tardanza; acabo de ver tu respuesta).

Sí que me sirve, pero me interesaba saber cómo se podía conseguir de la manera que expuse, porque para otras aplicaciones (para...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Salvador1]

para ganar velocidad, procura (cuando sea posible) evitar los bucles (p.e.)

Decía lo de la velocidad porque ese bucle -según entiendo- almacena los datos...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí