Az Excel VBA (Visual Basic for Applications) egy hatékony eszköz, amely lehetővé teszi az Excel-funkciók automatizálását és testreszabását. Az egyik legfontosabb automatizálható funkció a nyomtatás. A VBA használatával beállíthat bizonyos nyomtatási beállításokat, például a példányszámot, az oldal tájolását és a papírméretet, sőt, bizonyos oldalakat vagy cellatartományokat is kinyomtathat. Ebben a cikkben azt tárgyaljuk, hogyan használhatja az Excel VBA-t nyomtatásra.
Először is be kell állítania egy makrót a nyomtatási folyamat automatizálásához. Ehhez nyissa meg a Visual Basic szerkesztőt az Alt + F11 billentyűkombinációval. A szerkesztőben válassza a menüből a „Beszúrás”, majd a „Modul” menüpontot. Ezzel létrehoz egy új modult, ahová megírhatja a VBA kódot.
A következő lépés a nyomtatási folyamatot automatizáló kód megírása. Számos parancsot használhat a VBA-ban az Excel dokumentum nyomtatásához. Íme egy példakód:
Dim PrintRange As Range
With ActiveSheet.PageSetup
.FitToPagesWide = 1
End With
End Sub
3. lépés: A kód testreszabása
A kódot a saját nyomtatási igényeihez igazíthatja. Például módosíthatja a nyomtatási tartományt, hogy más cellákat vagy tartományokat is tartalmazzon, vagy módosíthatja a példányok számát és az oldal tájolását. További parancsokat is hozzáadhat, például a papírméret beállítását vagy meghatározott oldalak nyomtatását.
Miután megírta és testre szabta a kódot, az F5 billentyű lenyomásával vagy a Visual Basic szerkesztőben a „Futtatás” gombra kattintva futtathatja a makrót. Ez kinyomtatja az Excel-dokumentumot a megadott nyomtatási beállításokkal.
Összefoglalva, az Excel VBA használatával a nyomtatáshoz időt és energiát takaríthat meg, különösen akkor, ha rendszeresen nagy mennyiségű adatot vagy dokumentumot kell kinyomtatnia. Egy makró beállításával és a kód megírásával automatizálhatja a nyomtatási folyamatot, és a saját igényeihez igazíthatja azt. Egy kis gyakorlással az automatizálás mesterévé válhat, és racionalizálhatja Excel-feladatait.
A Visual Basicben a Print parancs segítségével küldhet kimenetet egy nyomtatóra vagy egy nyomtatási előnézeti ablakba. A Print parancs szintaxisa a következő:
Print [output]
Ahol a „output” a nyomtatni kívánt szöveg vagy adat.
A Print parancs használatához először meg kell nyitnia egy nyomtatót vagy nyomtatási előnézeti ablakot a Visual Basic megfelelő módszereinek segítségével. Ha az ablak meg van nyitva, a Print paranccsal küldhetünk rá kimenetet.
Íme egy példa a Print parancs használatára a Visual Basicben:
1. Nyisson meg egy nyomtatót vagy nyomtatási előnézeti ablakot a Visual Basic megfelelő módszereivel.
2. A Print paranccsal küldjünk kimenetet a nyomtatóra vagy az előnézeti ablakba. Például:
Print „Hello, world!”
3. Ismételje meg a 2. lépést szükség szerint, ha további kimenetet szeretne küldeni a nyomtatóra vagy az előnézeti ablakba.
4. Zárja be a nyomtatót vagy az előnézeti ablakot, amikor befejezte a Visual Basic megfelelő módszereinek használatával.
Vegye figyelembe, hogy a nyomtatóra vagy az előnézeti ablakba küldött kimenet nemcsak szöveget, hanem grafikákat, táblázatokat és más típusú adatokat is tartalmazhat. A Visual Basic formázási és elrendezési eszközeivel megtervezheti a kimenetet, mielőtt azt a nyomtatóra vagy az előnézeti ablakba küldi a Nyomtatás parancs segítségével.
Ha nyomtatási gombot szeretne létrehozni az Excel VBA-ban, kövesse az alábbi lépéseket:
1. Nyissa meg azt az Excel munkalapot, ahol a nyomtatási gombot szeretné létrehozni.
2. Nyomja meg az Alt + F11 billentyűkombinációt a Visual Basic szerkesztő megnyitásához.
3. A Visual Basic szerkesztőben kattintson a Beszúrás -> UserForm gombra egy új UserForm létrehozásához.
4. Húzzon egy parancsgombot az eszköztárból a UserFormra.
5. Kattintson duplán a parancsgombra a gomb kódablakának megnyitásához.
6. Írja be a következő kódot a kódablakba:
Private Sub CommandButton1_Click()
ActiveSheet.PrintOut
End Sub
7. Zárja be a kódablakot, és térjen vissza az Excel munkalapra.
8. Kattintson a jobb gombbal a parancsgombra, és válassza a Properties (Tulajdonságok) lehetőséget.
9. A Tulajdonságok ablakban módosítsuk a Name tulajdonságot valami olyasmire, mint például „PrintButton”.
10. Zárja be a Tulajdonságok ablakot.
Most már van egy nyomtatási gombja az Excel VBA-ban! Amikor a gombra kattint, az aktív lapot fogja kinyomtatni. Ha egy másik lapot szeretne kinyomtatni, módosíthatja a kódot, hogy megadhassa a nyomtatni kívánt lapot. Ha például a Sheet2 lapot szeretné kinyomtatni, akkor a következő kódot használhatja:
Private Sub CommandButton1_Click()
Sheets(„Sheet2”).PrintOut
End Sub
A kiválasztott lapok nyomtatásához az Excelben makró segítségével a következő lépéseket követheti:
1. Nyissa meg a nyomtatni kívánt lapokat tartalmazó Excel munkafüzetet.
2. Nyomja meg az Alt + F11 billentyűkombinációt a Visual Basic szerkesztő megnyitásához.
3. A szerkesztőben kattintson a Beszúrás > Modul gombra egy új modul beszúrásához.
4. A modulban írja be a következő kódot:
Sub PrintSelectedSheets()
Dim sht As Worksheet
For Each sht In ActiveWindow.SelectedSheets
sht.PrintOut
Next sht
End Sub
5. Mentse a makrót a Fájl > Mentés gombra kattintva.
6. Zárja be a Visual Basic szerkesztőt.
7. Menjen vissza az Excel munkafüzetéhez, válassza ki a kinyomtatni kívánt lapokat a lapok fülére kattintva, miközben lenyomva tartja a Ctrl billentyűt.
8. Kattintson a Fejlesztő > Makrók gombra a Makrók párbeszédpanel megnyitásához.
9. Válassza ki a PrintSelectedSheets makrót, és kattintson a Futtatás gombra.
10. Az Excel automatikusan kinyomtatja a kiválasztott lapokat.
Megjegyzés: A makró futtatása előtt győződjön meg arról, hogy a nyomtató megfelelően van-e beállítva, és van-e elég papír a tálcában.