Ena bolj nadležnih stvari v Excelu je zapiranje več delovnih zvezkov hkrati. Za vsak delovni zvezek, ki ste ga odprli, morate aktivirati delo, ga zapreti in potrditi shranjevanje sprememb. Excel nima enostavnega načina za zapiranje vseh naenkrat. Ta mali makro poskrbi za to nadlogo.
Kako deluje makro
V tem makru se zbirka Delovni zvezki vrti po vseh odprtih delovnih zvezkih. Ko se makro vrti skozi vsak delovni zvezek, jih shrani in zapre:
Podmakro1()
1. korak: Deklarirajte svoje spremenljivke
Dim wb kot delovni zvezek
2. korak: Prelistajte delovne zvezke, shranite in zaprite
Za vsak wb v delovnih zvezkih
wb.Close SaveChanges:=True
Naslednji wb
Končni sub
1. korak razglasi spremenljivko Object, ki predstavlja predmet delovnega zvezka. To vam omogoča, da naštevate po vseh odprtih delovnih zvezkih in zajamete njihova imena, ko greste.
2. korak preprosto preide skozi odprte delovne zvezke, jih shrani in zapre. Če jih ne želite shraniti, spremenite argument SaveChanges iz True v False.
Kako uporabljati makro
Najboljše mesto za shranjevanje tega makra je v vašem osebnem delovnem zvezku z makrami. Na ta način vam je makro vedno na voljo. Osebni delovni zvezek makra se naloži vsakič, ko zaženete Excel. V oknu projekta VBE se imenuje personal.xlsb.
Aktivirajte urejevalnik Visual Basic s pritiskom na Alt+F11.
Z desno tipko miške kliknite personal.xlb v oknu projekta.
Izberite Vstavi → Modul.
V novo ustvarjeni modul vnesite ali prilepite kodo.
Če v oknu projekta ne vidite personal.xlb, ta še ne obstaja. Posneli boste makro z uporabo osebnega delovnega zvezka z makrami kot cilja.
Če želite posneti makro v svoj osebni delovni zvezek z makrami, odprite pogovorno okno Record Macro. Na spustnem seznamu Store Macro In izberite Personal Macro Workbook. Nato preprosto posnamete nekaj klikov celice in ustavite snemanje. Posneti makro lahko zavržete in ga zamenjate s tem.