Prisilno shranite delovni zvezek - Workbook_BeforeClose
Ne bi vam svetoval uporabe tega, ampak zaradi eksperimentiranja in kot predstavitev ActiveWorkbook -a.
Delovni zvezek lahko shranite, ne da bi uporabniku dali možnost »Da/Ne« z naslednjo kodo:
To postavite v modul ThisWorkbook…
| 1234567891011121314 | Private Sub Workbook_BeforeClose (Prekliči kot logično)Če je shranjeno = napačno, potemActiveWorkbook.SaveKonec ČeEnd Sub |
To ne deluje za več delovnih zvezkov. Če želite, da deluje z več delovnimi zvezki, morate kodo vstaviti v datoteko personal.xls ali pa jo prenašati skozi vse odprte delovne zvezke.
