Libro abierto tras su cierre
Buenos días. Mi versión de trabajo, excel 2007 y mi problema es el siguiente:
tengo una macro que me controla el cierre de libros en el sentido de que si solo tengo un libro abierto, cierra excel totalmente con Application.Quit. El rollo viene cuando tengo más abiertos. Cierro el libro en concreto con:
ActiveWorkBook.Close savechanges:=false
ó
Workbooks(nombre_libro).close savechanges:=false
y funciona correctamente pero a continuación me vuelve a abrir este libro. Por qué pasa esto?
Muchas gracias por adelantado. Saludos desde Sevilla.
1 respuesta
Este código cierra todos libros que haya abiertos
Sub GuardarYCerrar()
Err = 0: On Local Error GoTo Exit_GuardarYCerrar
Application.Cursor = xlWait
Application.DisplayAlerts = False
Dim k As Integer
For k = 1 To Application.Workbooks.Count
Application.Workbooks(k).Save
Next k
Application.Cursor = xlDefault
Application.DisplayAlerts = True
Application.Quit
Exit Sub
Exit_GuardarYCerrar:
Application.DisplayAlerts = True
'ShowSystemError '( sin el funciona
End Sub
