Stäng en arbetsbok med VBA i Microsoft Excel

Innehållsförteckning

I den här artikeln lär vi oss hur man utmärker sig nära arbetsbok med VBA i Microsoft Excel 2010.

När ditt VBA -makro / kod har utfört alla nödvändiga åtgärder, vill du att makrot ska antingen spara filen eller hoppa över att spara den. Så här är alternativen du kan ställa in i koden medan du ber den stänga filen. Metoden Close and Open i VBA kan användas för att stänga och öppna arbetsböcker.

Om du vill att koden bara ska stänga filen utan att spara ändringarna - använd den här raden i slutet av koden eller där det behövs -

ActiveWorkbook.Close (False) eller ActiveWorkbook.Close False eller ActiveWorkbook.CloseSaveChanges: = FALSE

Se koden i denna bild nedan. För att kopiera koden, tryck på Alt + F11 på tangentbordet samtidigt som du ser till att excelarket är öppet. Högerklicka sedan på Microsoft Excel -objekt och välj Infoga. Klicka sedan på Modul. Kopiera över koden nedanför bilden -

Alternativ Explicit

Undermakro1 ()

ActiveWorkbook.Close False

Avsluta Sub

Obs! Du kan ändra texten ActiveWorkbook så att den hänvisar till namnet på arbetsboken eller variabeln som du har använt för att identifiera arbetsboken enligt din kod.

Om du vill att koden ska spara ändringarna när du stänger filen använder du

ActiveWorkbook.Close (True) eller ActiveWorkbook.Close True eller ActiveWorkbook.Close SaveChanges: = TRUE

Här är koden -

Alternativ Explicit

Undermakro1 ()

ActiveWorkbook.Close True

Avsluta Sub

Men om du vill att användaren ska bestämma behöver du bara ange

ActiveWorkbook.Close

Här är koden -

Alternativ Explicit

Undermakro1 ()

ActiveWorkbook.Close

Avsluta Sub

Användaren får en popup som frågar om de vill spara arbetsboken eller inte.

Arbetsböcker ("File1.XLS"). Stäng SaveChanges: = False

Detta exempel stänger File1.xls och kasserar alla ändringar som har gjorts.

Slutsats:

Om “Application.DisplayAlerts” har ställts in på False, kommer du inte att få någon popup och arbetsboken stängs direkt utan att bli ombedd att spara.

Denna popup visas om "Application.DisplayAlerts" inte är inställd på False någonstans före excel vba Activeworkbook.Close kodrad.

Så även om koden kräver att du stänger av varningarna, se till att "Application.DisplayAlerts = True" finns före Activeworkbook.Close -raden.

Om du gillade våra bloggar, dela den med dina vänner på Facebook. Och du kan också följa oss på Twitter och Facebook.
Vi vill gärna höra från dig, låt oss veta hur vi kan förbättra, komplettera eller förnya vårt arbete och göra det bättre för dig. Skriv till oss påe -postsajt

Du kommer att bidra till utvecklingen av webbplatsen, dela sidan med dina vänner

wave wave wave wave wave