Cerrar libro

Hola,
Me gustaría saber si existe alguna forma de evitar que cierren el documento de excel con la "x" del libro o del excel en si.
Yo quisiera que solo pudiera cerrar el libro mediante un botón que activara una marcro con actiwindows.close.
Gracias
Respuesta
1
En el objeto ThisWorkbook introduce el siguiente código...
Option Explicit
Dim Boton As Boolean
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If Not Boton Then
Cancel = True
End If
End Sub
Public Sub CerrarLibro()
Boton = True
ThisWorkbook.Close True
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas