Tving en arbeidsbok til å lagre før den lukkes - eksempler på VBA -kode

Tving arbeidsbok til å lagre - Workbook_BeforeClose

Jeg vil ikke råde deg til å bruke dette, men for å eksperimentere og som en demonstrasjon av ActiveWorkbook.

Du kan lagre en arbeidsbok uten å gi brukeren et "Ja/Nei" -alternativ med følgende kode:

Plasser dette i ThisWorkbook -modulen …

1234567891011121314 Private Sub Workbook_BeforeClose (Avbryt som boolsk)Hvis lagret = usant daActiveWorkbook.SaveSlutt omSlutt Sub

Dette fungerer ikke for flere arbeidsbøker. For å få det til å fungere med flere arbeidsbøker, må du plassere koden i filen personal.xls eller la den gå gjennom alle åpne arbeidsbøker.

wave wave wave wave wave