Salir de Excel
Hay algún comando para salir completamente de excel desde una macro, ya que el que tengo actualmente es el de cerrar el libro de excel pero no el de salir de excel.
Gracias
Gracias
1 Respuesta
Respuesta
1
Perfecto; donde tenés el comentario 'Salir de Excel, reemplázalo por
Application. Quit
El resto queda todo igual
Application. Quit
El resto queda todo igual
Era la parte que falta para finalizar mi archivo
Mira, esta es la sintaxis que tengo, pero lo que deseo es salir de excel a parte de cerrar la hoja de excel, ¿pero no se como?
Private Sub Workbook_Beforeclose(Cancel As Boolean)
If ActiveSheet.Range("C40").Value = 1 Then
' Mostrar la Hoja Grabar "Siempre"
Worksheets("Grabar").Visible = True
' Ocultar Hojas y no dejarlas mostrar hasta que se autorice
Worksheets("Tabla").Visible = xlSheetVeryHidden
Worksheets("Tabla1").Visible = xlSheetVeryHidden
' Grabar y Cerrar Hojas Activas
ActiveWorkbook. Sabe
ActiveWindow.Close SaveChanges:=True
' Salir de Excel
Else
MsgBox ("No se puede Cerrar por aquí. Pulse el Bóton Terminar Captura y Cerrar")
Cancel = True
End If
End Sub
Private Sub Workbook_Beforeclose(Cancel As Boolean)
If ActiveSheet.Range("C40").Value = 1 Then
' Mostrar la Hoja Grabar "Siempre"
Worksheets("Grabar").Visible = True
' Ocultar Hojas y no dejarlas mostrar hasta que se autorice
Worksheets("Tabla").Visible = xlSheetVeryHidden
Worksheets("Tabla1").Visible = xlSheetVeryHidden
' Grabar y Cerrar Hojas Activas
ActiveWorkbook. Sabe
ActiveWindow.Close SaveChanges:=True
' Salir de Excel
Else
MsgBox ("No se puede Cerrar por aquí. Pulse el Bóton Terminar Captura y Cerrar")
Cancel = True
End If
End Sub
No se cual usas actualmente; proba con la instrucción
Quit
Quit