Actividad pública reciente
Ha valorado "Excelente" la respuesta
Consolidar tabla con nombre de hoja en hipervínculo y datos de celdas específicas
Te anexo la macro actualizada. Private Sub Worksheet_Activate() Dim cHoja As Worksheet Dim L As Long Dim X As Long ' L = 9 With Me .Columns(1).ClearContents .Cells(10, 1) = "INDICE" .Cells(10, 1).name = "Indice" End With ' For Each cHoja In...