Como salir de Excel sin guardar cambios

Estoy haciendo un formulario en el cual tengo un botón de salir ya inhabilite la X de la esquina para que solo usen el botón de salir. Mi duda es como hago para que se cierre por completo el excel ya que cuando le doy en salir solo se cierra el libro pero queda la aplicación activa

La macro que estoy usando es la siguiente:

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Private Sub CommandButton2_Click()
ActiveWorkbook.Close False
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If Not snBotonCerrar Then
        MsgBox "Usa el botón de Salir para cerrar este formulario"
        Cancel = True
    End If
End Sub

2 Respuestas

Respuesta
1

[Hola 

Application. Quit
Respuesta
1

Te envío el código modificado

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub
Private Sub CommandButton2_Click()
'Con esta indicacion cierras la aplicación
Application.Quit
ActiveWorkbook.Close False
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If Not snBotonCerrar Then
        MsgBox "Usa el botón de Salir para cerrar este formulario"
        Cancel = True
    End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas