Če morate tiskati iz več Excelovih delovnih zvezkov v imeniku, lahko uporabite makro, ki je tukaj predstavljen, da jih natisnete vse hkrati.
Kako deluje makro
V tem makru uporabite funkcijo Dir, da vrnete niz, ki predstavlja ime datoteke, ki se ujema s tem, kar ji posredujete.
Funkcijo Dir uporabite za naštevanje vseh datotek .xlsx v danem imeniku, pri čemer zajamete ime vsake datoteke. Nato odprete vsako datoteko, jo natisnete in zaprete.
Podmakro1()
1. korak: Razglasite svoje spremenljivke
Zatemni moje datoteke kot niz
2. korak: Določite ciljni imenik
Moje datoteke = Dir("C:Temp*.xlsx")
Naredi, medtem ko moje datoteke <> "
'3. korak: Odprite delovne zvezke enega za drugim
Delovni zvezki. Odprite "C:Temp" in Moje datoteke