Een werkmap dwingen om op te slaan voordat het wordt gesloten - VBA-codevoorbeelden

Werkmap dwingen om op te slaan - Workbook_BeforeClose

Ik zou het niet aanraden om dit te gebruiken, maar omwille van het experimenteren en als demonstratie van ActiveWorkbook.Save:

U kunt een werkmap opslaan zonder de gebruiker een "Ja/Nee"-optie te geven met de volgende code:

Plaats dit in de ThisWorkbook-module…

1234567891011121314 Private Sub Workbook_BeforeClose (Annuleren als Boolean)Indien opgeslagen = niet waar danActiveWorkbook.OpslaanStop alsEinde sub

Dit werkt niet voor meerdere werkmappen. Om het met meerdere werkmappen te laten werken, moet je de code in het bestand personal.xls plaatsen of door alle geopende werkmappen laten lopen.

wave wave wave wave wave