Kui teil on vaja printida ühes kataloogis mitmest Exceli töövihikust, saate need kõik korraga printimiseks kasutada siin esitatud makrot.
Kuidas makro töötab
Selles makros kasutate funktsiooni Dir, et tagastada string, mis tähistab faili nime, mis vastab sellele, mida te sellele edastate.
Funktsiooni Dir kasutate kõigi antud kataloogis olevate xlsx-failide loetlemiseks, jäädvustades iga faili nime. Seejärel avate iga faili, printige need ja seejärel sulgete.
Alammakro1()
1. samm: deklareerige oma muutujad
Dim MyFiles stringina
2. samm: määrake sihtkataloog
Minu failid = Dir("C: Temp*.xlsx")
Tehke ajal MyFiles <> "
3. samm: avage töövihikud ükshaaval
Töövihikud. Avage "C:Temp" ja MyFiles