Ha egy könyvtárban több Excel-munkafüzetből kell nyomtatnia, az itt bemutatott makróval egyszerre nyomtathatja ki őket.
Hogyan működik a makró
Ebben a makróban a Dir függvénnyel visszaadja a fájl nevét, amely megegyezik azzal, amit átadott neki.
A Dir függvény segítségével felsorolhatja az adott könyvtárban található összes .xlsx fájlt, rögzítve az egyes fájlok nevét. Ezután minden fájlt megnyit, kinyomtat, majd bezárja.
Almakró1()
'1. lépés: Deklarálja a változókat
Dim MyFiles As String
'2. lépés: Adjon meg egy célkönyvtárat
Saját fájlok = Dir("C:Temp*.xlsx")
Do While MyFiles <> "
'3. lépés: Nyissa meg egyenként a munkafüzeteket
Munkafüzetek. Nyissa meg a „C:Temp” és a MyFiles alkalmazást