Forza cartella di lavoro da salvare - Workbook_BeforeClose
Non consiglierei di usarlo, ma per motivi di sperimentazione e come dimostrazione di ActiveWorkbook.Save:
Puoi salvare una cartella di lavoro senza dare all'utente un'opzione "Sì/No" con il seguente codice:
Inserisci questo nel modulo ThisWorkbook…
1234567891011121314 | Cartella di lavoro secondaria privata_BeforeClose (Annulla come booleano)Se salvato = falso alloraActiveWorkbook.SalvaFinisci seFine sottotitolo |
Questo non funziona per più cartelle di lavoro. Per farlo funzionare con più cartelle di lavoro è necessario inserire il codice nel file personal.xls o farlo scorrere in tutte le cartelle di lavoro aperte.