Te dejo la macro para ocultar todas las hojas.
Bueno, en excel no puedes ocultar todas, tienes que dejar al menos una, en este caso la macro te deja visible la primer hoja y te oculta todas las demás. Pon un botón en la primera hoja para ejecutar la macro.
Sub OcultarTodasLasHojas()
'Por.Dante Amor
Sheets(1).Visible = True
For i = 2 To Sheets.Count
Sheets(i).Visible = False
Next
MsgBox "Hojas ocultas"
End Sub
Sigue las Instrucciones para un botón y ejecutar la macro
- Abre tu libro de Excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- En el menú elige Insertar / Módulo
- En el panel del lado derecho copia la macro
- Ahora para crear un botón, puedes hacer lo siguiente:
- Inserta una imagen en tu libro, elige del menú Insertar / Imagen / Autoformas
- Elige una imagen y con el Mouse, dentro de tu hoja, presiona click y arrastra el Mouse para hacer grande la imagen.
- Una vez que insertaste la imagen en tu hoja, dale click derecho dentro de la imagen y selecciona: Tamaño y Propiedades. En la ventana que se abre selecciona la pestaña: Propiedades. Desmarca la opción “Imprimir Objeto”. Presiona “Cerrar”
- Vuelve a presionar click derecho dentro de la imagen y ahora selecciona: Asignar macro. Selecciona: OcultarTodasLasHojas
- Aceptar.
- Para ejecutarla dale click a la imagen.
Saludos. Dante Amor
Si es lo que necesitas.
Y que lo haga de manera automática - Joel Puentes
Para que se haga de manera automática, tiene que ocurrir un evento en el libro o en alguna hoja de excel, por ejemplo, que guardes el libro, o al momento de cerrar el libro, o al abrir el libro, o cuando modificas alguna celda de alguna hoja. Tendrás que decirme en qué momento quieres que se haga en automático. Con gusto te ayudo con la petición. Crea una nueva pregunta, en el desarrollo de la pregunta escribe "Para Dante Amor", ahí me describes con detalle cómo lo quieres. - Dante Amor