Como cerrar libro sin petición salvar cambios.
Publicado por Wiru (14 intervenciones) el 24/05/2009 21:14:07
Tengo un libro con dos hojas "Menú" y "Almacén". Al ejecutar el archivo "Cuentas.xlsm" carga la hoja numero 1 (Menú) y me muestra una pantalla donde pido que deshabiliten macros para continuar. Solo al activar las macros, salta a la segunda y me la muestra (Almacén).Si no activas macros no te deja continuar.. O sea es una forma de obligar a activar las macros.
Es algo así:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Menú").Visible = True
Sheets("Almacén").Visible = xlVeryHidden
End Sub
Private Sub Workbook_Open()
Sheets("Almacén").Visible = True
Sheets("Menú").Visible = xlVeryHidden
End Sub
Private Sub cerrar()
Application.DisplayAlerts = False
Application.Quit
End Sub
Cuando quiero salir del libro, necesito que NO ofrezca guardar los cambios,y ya he encontrado como hacerlo, con una macro asignada a un botón creado por mi que le he puesto "Cerrar Hoja" usando comandos como "Activeworkbook.Close" y otros como "Application.DisplayAlerts = False". Todo funciona perfectamente, pero si en lugar de pulsar dicho botón, pulso arriba a la derecha en la X de CERRAR VENTANA (también se cierra la hoja de esta forma) en vez del ir al Menu de Excel y pulsar Cerrar, o usar ese botón creado por mi, me sale el aviso ¿Desea guardar los cambios efectuados en el Cuentas.xlsm? SI, NO o Cancelar..........justo lo que trato de evitar. Quiero que no ofrezca salvar los cambios se cierre de donde se cierre el archivo.¿Alguna idea?. Gracias y hasta pronto desde Granada España.
Es algo así:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Menú").Visible = True
Sheets("Almacén").Visible = xlVeryHidden
End Sub
Private Sub Workbook_Open()
Sheets("Almacén").Visible = True
Sheets("Menú").Visible = xlVeryHidden
End Sub
Private Sub cerrar()
Application.DisplayAlerts = False
Application.Quit
End Sub
Cuando quiero salir del libro, necesito que NO ofrezca guardar los cambios,y ya he encontrado como hacerlo, con una macro asignada a un botón creado por mi que le he puesto "Cerrar Hoja" usando comandos como "Activeworkbook.Close" y otros como "Application.DisplayAlerts = False". Todo funciona perfectamente, pero si en lugar de pulsar dicho botón, pulso arriba a la derecha en la X de CERRAR VENTANA (también se cierra la hoja de esta forma) en vez del ir al Menu de Excel y pulsar Cerrar, o usar ese botón creado por mi, me sale el aviso ¿Desea guardar los cambios efectuados en el Cuentas.xlsm? SI, NO o Cancelar..........justo lo que trato de evitar. Quiero que no ofrezca salvar los cambios se cierre de donde se cierre el archivo.¿Alguna idea?. Gracias y hasta pronto desde Granada España.
Valora esta pregunta
0