Az automatizálás művészete: Hogyan használjuk az Excel VBA-t a nyomtatáshoz


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.

1. lépés: A makró beállítása

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.

2. lépés: A kód megírása

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:

Sub PrintDoc()

Dim PrintRange As Range

Set PrintRange = ActiveSheet.Range(„A1:B5”)

With ActiveSheet.PageSetup

.PrintArea = PrintRange.Address

.FitToPagesWide = 1

.Orientation = xlPortrait

End With

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

End Sub

Ez a kód az A1 és B5 közötti cellákat egy oldalra nyomtatja, egy példányban és összevágva, valamint portré tájolásban.

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.

4. lépés: A makró futtatása

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.

FAQ
Hogyan használja a nyomtatási parancsot Visual Basicben?

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.

Hogyan hozhatok létre nyomtatási gombot az Excel VBA-ban?

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

Hogyan nyomtathatom ki a kiválasztott lapokat az Excelben makróval?

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.