¿Cómo ocultar todas las hojas de un archivo? (DAM)
Hola Dante amor:
Pues aquí mi pregunta, incluí una macro en el wokbook para que se oculten todas las hojas al momento de la apertura pero me marca errores.
1 Respuesta
Comprendo, ¡Gracias! y buenas noches.
Con lo siguiente ocultas todas las hojas, pero primer haces una hoja visible, de esta forma puedes dejar una hoja visible
Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Por.Dante Amor
Sheets("INICIO").Visible = True
For Each h In Sheets
If h.Name <> "INICIO" Then
h.Visible = xlVeryHidden
End If
Next
ThisWorkbook.Save
End Sub
¡Buen día!, maestro Dante:
Ya adapte el código en el workbook, guarde y cerré mi archivo, lo abrí de nuevo y no se ocultaron, aun siguen visibles todas las hojas.
Lo único que cambie fue el nombre de la hoja que debe estar visible.
Será por la versión del excel que uso (2013), espero sus comentarios, muchas gracias.
Sí, es por la versión, ya hice pruebas en mi versión 2007 y me funciona al 100
Ok. Veré si encuentro algo que funcione para la versión que uso, de cualquier modo le agradezco muchísimo la atención y el tiempo que dedicó a mi solicitud.
¡Gracias!
