Problema con indice
Tengo un libro de excel con unas 200 hojas y creado un indice con esta macro:
Sub Macro2()
Dim fill As Long, w As Worksheet, sHoja As String
fill = 5
For Each w In ThisWorkbook.Worksheets
sHoja = w.Name
Cells(fill, 2).FormulaR1C1 = sHoja
ActiveSheet.Hyperlinks.Add Anchor:=Cells(fill, 2), Address:="", _
SubAddress:=sHoja & "!A1", TextToDisplay:=sHoja
fill = fill + 1
Next w
End Sub
El problema es que me abre todas las hojas que contienen nombres simples, pero las hojas que contienen nombres compuestos con un espacio, me dice referencia no valida, como puedo solucionarlo.
Y otra pregunta seria, si hay alguna manera que desde cualquier hoja del libro pueda ir a la hoja del indice.
Soy inexperta, y les agradecería me lo explicaran paso a paso.
Un saludo y gracias de antemano
Sub Macro2()
Dim fill As Long, w As Worksheet, sHoja As String
fill = 5
For Each w In ThisWorkbook.Worksheets
sHoja = w.Name
Cells(fill, 2).FormulaR1C1 = sHoja
ActiveSheet.Hyperlinks.Add Anchor:=Cells(fill, 2), Address:="", _
SubAddress:=sHoja & "!A1", TextToDisplay:=sHoja
fill = fill + 1
Next w
End Sub
El problema es que me abre todas las hojas que contienen nombres simples, pero las hojas que contienen nombres compuestos con un espacio, me dice referencia no valida, como puedo solucionarlo.
Y otra pregunta seria, si hay alguna manera que desde cualquier hoja del libro pueda ir a la hoja del indice.
Soy inexperta, y les agradecería me lo explicaran paso a paso.
Un saludo y gracias de antemano
1 respuesta
Respuesta de macros_excel
1