Cerrar todos los libros abiertos

Hola Marvin,

1) guardando:

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
wb.Save
wb.Close
Next wb
End Sub

2) sin guardar:

Sub test()
Dim wb As Workbook
For Each wb In Workbooks
wb.Close False
Next wb
End Sub


Saludos,
KL


"Marvin" wrote in message
news:

Saludos Grupo, Alguien conoce la instruccion para cerrar todos los libros
abiertos guardando cambios en todos y de igual manera sin guardar cambios
en
todos. Gracias.