¿Alguna vez has intentando mostrar todas las hojas ocultas en un
libro de Excel? si tu respuesta fue Si, entonces ya te diste cuenta de
que no hay una opción.
para poder solucionar este detalle tenemos que utilizar el siguiente código.
Alt+F11
insertamos un módulo y pegamos este código:
Sub mostrar_hojas_ocultas_()
Dim hojas As Byte
hojas = Sheets.Count
For i = 1 To hojas
Sheets(i).Visible = True
Next
End Sub
Y con esto solucionamos en segundos.
para poder solucionar este detalle tenemos que utilizar el siguiente código.
Alt+F11
insertamos un módulo y pegamos este código:
Sub mostrar_hojas_ocultas_()
Dim hojas As Byte
hojas = Sheets.Count
For i = 1 To hojas
Sheets(i).Visible = True
Next
End Sub
Y con esto solucionamos en segundos.
Comentarios
Publicar un comentario