Evitar se muestre hoja oculta al pinchar cerrar li
Hola a todos.
Utilizo estos códigos que ocultan y desocultan hojas, para obligar a que el usuario habilite las macros antes de utilizar un libro. . . . .
Ambos están en This Workbook, en sus correspondientes eventos. . . . .
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("Importante").Visible = True
Worksheets("Los + buscados.").Visible = xlSheetVeryHidden
Worksheets("Tarifa_peticiones").Visible = xlSheetVeryHidden
Worksheets("PEDIDOS").Visible = xlSheetVeryHidden
Worksheets("Dudas frecuentes").Visible = xlSheetVeryHidden
End Sub
________________________________________________________________
Private Sub Workbook_Open()
Worksheets("Los + buscados.").Visible = True
Worksheets("Tarifa_peticiones").Visible = True
Worksheets("PEDIDOS").Visible = True
Worksheets("Dudas frecuentes").Visible = True
Worksheets("Importante").Visible = xlSheetVeryHidden
End Sub
Tengo dos incomnvenientes:
Leve: * cuando se habilitan las macro y abre l libro completo, parpadeo importante
Grave: ** al clicar en cerrar libro (aunque no se haya hecho el más mínimo cambio):
Sale siempre el diálogo de Excel de: "Desea guardar los cambios efectuados. . .?" y
se activa la hoja oculta: "Importante", que aparece como fondo de dicho diálogo, y
desaparecen las hojas normalmente visibles. . . .
Esto, aparte de lo pesadito que resulta para cualquiera desconcierta a los usuarios
puesto que, además es en la hoja:"Importante", donde figura el mensaje que cuando
intentan abrir sin habilitar macros, les advierte que de no hacerlo el libro no será
operativo. . . .
Agradezco vuestra ayuda para las correcciones necesarias, o el aporte de otra solución
para obligar a habilitar macros que no genere estos problemas.
Un abrazo.
Utilizo estos códigos que ocultan y desocultan hojas, para obligar a que el usuario habilite las macros antes de utilizar un libro. . . . .
Ambos están en This Workbook, en sus correspondientes eventos. . . . .
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Worksheets("Importante").Visible = True
Worksheets("Los + buscados.").Visible = xlSheetVeryHidden
Worksheets("Tarifa_peticiones").Visible = xlSheetVeryHidden
Worksheets("PEDIDOS").Visible = xlSheetVeryHidden
Worksheets("Dudas frecuentes").Visible = xlSheetVeryHidden
End Sub
________________________________________________________________
Private Sub Workbook_Open()
Worksheets("Los + buscados.").Visible = True
Worksheets("Tarifa_peticiones").Visible = True
Worksheets("PEDIDOS").Visible = True
Worksheets("Dudas frecuentes").Visible = True
Worksheets("Importante").Visible = xlSheetVeryHidden
End Sub
Tengo dos incomnvenientes:
Leve: * cuando se habilitan las macro y abre l libro completo, parpadeo importante
Grave: ** al clicar en cerrar libro (aunque no se haya hecho el más mínimo cambio):
Sale siempre el diálogo de Excel de: "Desea guardar los cambios efectuados. . .?" y
se activa la hoja oculta: "Importante", que aparece como fondo de dicho diálogo, y
desaparecen las hojas normalmente visibles. . . .
Esto, aparte de lo pesadito que resulta para cualquiera desconcierta a los usuarios
puesto que, además es en la hoja:"Importante", donde figura el mensaje que cuando
intentan abrir sin habilitar macros, les advierte que de no hacerlo el libro no será
operativo. . . .
Agradezco vuestra ayuda para las correcciones necesarias, o el aporte de otra solución
para obligar a habilitar macros que no genere estos problemas.
Un abrazo.
Respuesta de Carlos soloffice
1