Tabla de contenido
Obligar a guardar el libro - Workbook_BeforeClose
No recomendaría usar esto, pero por el bien de la experimentación y como una demostración de ActiveWorkbook.
Puede guardar un libro de trabajo sin darle al usuario una opción "Sí / No" con el siguiente código:
Coloque esto en el módulo ThisWorkbook …
| 1234567891011121314 | Private Sub Workbook_BeforeClose (Cancelar como booleano)Si se guarda = falso, entoncesActiveWorkbook.SaveTerminara siEnd Sub |
Esto no funciona para varios libros de trabajo. Para que funcione con varios libros de trabajo, debe colocar el código en el archivo personal.xls o hacer que recorra todos los libros de trabajo abiertos.
