En Excel-makro för att spara en arbetsbok före avslutning - dummies

Makroet som presenteras här är ett utmärkt sätt att skydda användare från att oavsiktligt stänga sin fil innan de sparas. När det implementeras, säkerställer detta makro att Excel automatiskt sparar arbetsboken innan den stängs.

Excel kommer normalt att varna användare som försöker stänga en obeffad arbetsbok, vilket ger dem möjlighet att spara innan de stängs. Många användare kan dock blåsa förbi varningen och av misstag klicka på Nej och berättar att Excel stängs utan att spara. Med detta makro skyddar du mot detta genom att automatiskt spara innan du stänger.

Hur makroen fungerar

Koden utlöses av arbetsbokens BeforeClose-händelse. När du försöker stänga arbetsboken brinner den här händelsen och kör koden inom. Kärnan i koden är enkel - det ber användarna om de vill stänga arbetsboken. Makroet utvärderar då om användaren klickade på OK eller Avbryt.

Meddelandet du ser när du försöker stänga arbetsboken.

Utvärderingen görs med ett Select Case-meddelande. Valet-satsen är ett alternativ till If-Then-Else-satsen, så att du kan göra villkorskontroller i dina makron. Grundkonstruktionen av ett Select Case-meddelande är enkelt:

Välj fallfall Är = Case Is = Case Is = Slutval

Med ett Select Case-meddelande kan du utföra många villkorliga kontroller. I det här fallet söker du helt enkelt efter OK eller Avbryt. Ta en titt på koden:

I steg 1 aktiverar du meddelandefältet som villkorskontroll för Select Case-satsen. Du använder vbOKCancel-argumentet för att se till att knapparna OK och Avbryt visas som val.

I steg 2, om användaren klickade på Avbryt i meddelandefältet, berättar makroet Excel för att avbryta Workbook_Close-händelsen genom att skicka True till Cancel Boolean.

Om användaren klickade på OK-knappen i meddelandefältet, träder steg 3 i kraft. Här berättar du om Excel för att spara arbetsboken. Och eftersom du inte angav Cancel Boolean to True fortsätter Excel med slutet.

I steg 4 stänger du helt enkelt Select Case-satsen. Varje gång du instanserar ett Select-fall måste du stänga det med ett motsvarande slutval.

Så här använder du makro

För att implementera detta makro måste du kopiera och klistra in det i fönstret Workbook_BeforeClose-händelsekod. Om du placerar makroet låter det springa varje gång du försöker stänga arbetsboken:

Aktivera Visual Basic Editor genom att trycka på Alt + F11.

1. I projektfönstret hittar du ditt projekt / arbetsbok namn och klickar på plustecknet bredvid det för att se alla lakan.

2. Klicka på ThisWorkbook.

3. I händelselistan väljer du händelsen BeforeClose.

4. Skriv eller klistra in koden i den nyskapade modulen.

5. Ange din kod i Workbook BeforeClose-händelsen.