Hipervinculos

[julio Cesar Orduz]

Tengo una consulta especial para personas especiales como ustedes, es la siguiente:

Me pueden ayudar con una macro de la siguiente manera: En una hoja de calculo en un libro me baje el listado...

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í

 

[Adrian]

Es lo que buscabas (Me parece)

Sub NombresHojas()
Dim i As Integer
Sheets(1).Select
For i = 1 To Sheets.Count
Range("A" & Trim(Str(i))).Value = Sheets(i).Name
Range("A" & Trim(Str(i))).Select...

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í

 

[betoso]

Que tal adrian, esta macro es fabulosa excelente,
pero tiene un problema solo funciona cuando en el nombre de la hoja no tiene espacios y/o no tiene caracteres especiales.

¿como podrias hacer...

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í

 

[galileogali]

Solo una pequeña moificacion:

Sub NombresHojas()
[size=2][i]Dim i As Integer
Sheets(1).Select
For i = 1 To Sheets.Count
Range("A" & Trim(Str(i))).Value = Sheets(i).Name
Range("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í

 

[betoso]

Excelente, maestro,
Nuevamente muy agradecido con usted y con todos los de la comunidad....
ahora conozco un poquito mas de estos asuntos de las macros que hace algunos meses no hubiera sabido...

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í