En af de mere irriterende ting i Excel er at lukke mange projektmapper på én gang. For hver projektmappe, du har åbnet, skal du aktivere arbejdet, lukke det og bekræfte lagringen af ændringer. Excel har ingen nem måde at lukke dem alle på én gang. Denne lille makro tager sig af den irritation.
Sådan fungerer makroen
I denne makro gennemgår samlingen af projektmapper alle åbnede projektmapper. Når makroen går gennem hver projektmappe, gemmer og lukker den dem:
Undermakro1()
Trin 1: Erklær dine variabler
Dim wb som arbejdsbog
Trin 2: Gå gennem projektmapper, gem og luk
For hver wb i arbejdsbøger
wb.Close SaveChanges:=True
Næste wb
Slut Sub
Trin 1 erklærer en objektvariabel, der repræsenterer et projektmappeobjekt. Dette giver dig mulighed for at opregne gennem alle de åbne projektmapper og fange deres navne, mens du går.
Trin 2 går ganske enkelt gennem de åbne projektmapper, gemmer og lukker dem. Hvis du ikke vil gemme dem, skal du ændre argumentet SaveChanges fra True til False.
Sådan bruger du makroen
Det bedste sted at gemme denne makro er i din personlige makroprojektmappe. På denne måde er makroen altid tilgængelig for dig. Den personlige makroprojektmappe indlæses, hver gang du starter Excel. I VBE-projektvinduet hedder det personal.xlsb.
Aktiver Visual Basic Editor ved at trykke på Alt+F11.
Højreklik på personal.xlb i projektvinduet.
Vælg Indsæt → Modul.
Indtast eller indsæt koden i det nyoprettede modul.
Hvis du ikke kan se personal.xlb i dit projektvindue, eksisterer det ikke endnu. Du skal optage en makro ved at bruge den personlige makroprojektmappe som destination.
For at optage makroen i din personlige makroprojektmappe skal du åbne dialogboksen Optag makro. I rullelisten Gem makro i skal du vælge Personal Macro Workbook. Så optag blot et par celleklik og stop optagelsen. Du kan kassere den optagede makro og erstatte den med denne.