{"id":16029,"date":"2023-04-24T00:00:00","date_gmt":"2023-04-24T00:00:00","guid":{"rendered":"https:\/\/megnyitasa.com\/tudas\/az-automatizalas-muveszete-hogyan-hasznaljuk-az-excel-vba-t-a-nyomtatashoz\/"},"modified":"2023-04-24T00:00:00","modified_gmt":"2023-04-24T00:00:00","slug":"az-automatizalas-muveszete-hogyan-hasznaljuk-az-excel-vba-t-a-nyomtatashoz","status":"publish","type":"post","link":"https:\/\/megnyitasa.com\/tudas\/az-automatizalas-muveszete-hogyan-hasznaljuk-az-excel-vba-t-a-nyomtatashoz\/","title":{"rendered":"Az automatiz\u00e1l\u00e1s m\u0171v\u00e9szete: Hogyan haszn\u00e1ljuk az Excel VBA-t a nyomtat\u00e1shoz"},"content":{"rendered":"
\n
<\/div>\n

Az Excel VBA (Visual Basic for Applications) egy hat\u00e9kony eszk\u00f6z, amely lehet\u0151v\u00e9 teszi az Excel-funkci\u00f3k automatiz\u00e1l\u00e1s\u00e1t \u00e9s testreszab\u00e1s\u00e1t. Az egyik legfontosabb automatiz\u00e1lhat\u00f3 funkci\u00f3 a nyomtat\u00e1s. A VBA haszn\u00e1lat\u00e1val be\u00e1ll\u00edthat bizonyos nyomtat\u00e1si be\u00e1ll\u00edt\u00e1sokat, p\u00e9ld\u00e1ul a p\u00e9ld\u00e1nysz\u00e1mot, az oldal t\u00e1jol\u00e1s\u00e1t \u00e9s a pap\u00edrm\u00e9retet, s\u0151t, bizonyos oldalakat vagy cellatartom\u00e1nyokat is kinyomtathat. Ebben a cikkben azt t\u00e1rgyaljuk, hogyan haszn\u00e1lhatja az Excel VBA-t nyomtat\u00e1sra. <\/p>\n

1. l\u00e9p\u00e9s: A makr\u00f3 be\u00e1ll\u00edt\u00e1sa <\/div>\n

El\u0151sz\u00f6r is be kell \u00e1ll\u00edtania egy makr\u00f3t a nyomtat\u00e1si folyamat automatiz\u00e1l\u00e1s\u00e1hoz. Ehhez nyissa meg a Visual Basic szerkeszt\u0151t az Alt + F11 billenty\u0171kombin\u00e1ci\u00f3val. A szerkeszt\u0151ben v\u00e1lassza a men\u00fcb\u0151l a „Besz\u00far\u00e1s”, majd a „Modul” men\u00fcpontot. Ezzel l\u00e9trehoz egy \u00faj modult, ahov\u00e1 meg\u00edrhatja a VBA k\u00f3dot. <\/p>\n

2. l\u00e9p\u00e9s: A k\u00f3d meg\u00edr\u00e1sa <\/div>\n

A k\u00f6vetkez\u0151 l\u00e9p\u00e9s a nyomtat\u00e1si folyamatot automatiz\u00e1l\u00f3 k\u00f3d meg\u00edr\u00e1sa. Sz\u00e1mos parancsot haszn\u00e1lhat a VBA-ban az Excel dokumentum nyomtat\u00e1s\u00e1hoz. \u00cdme egy p\u00e9ldak\u00f3d: <\/p>\n

Sub PrintDoc() <\/div>\n

Dim PrintRange As Range <\/p>\n

Set PrintRange = ActiveSheet.Range(„A1:B5”) <\/div>\n

With ActiveSheet.PageSetup <\/p>\n

.PrintArea = PrintRange.Address <\/div>\n

.FitToPagesWide = 1 <\/p>\n

.Orientation = xlPortrait <\/div>\n

End With <\/p>\n

<\/div>\n
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True <\/div>\n

End Sub <\/p>\n

Ez a k\u00f3d az A1 \u00e9s B5 k\u00f6z\u00f6tti cell\u00e1kat egy oldalra nyomtatja, egy p\u00e9ld\u00e1nyban \u00e9s \u00f6sszev\u00e1gva, valamint portr\u00e9 t\u00e1jol\u00e1sban. <\/div>\n

3. l\u00e9p\u00e9s: A k\u00f3d testreszab\u00e1sa <\/p>\n

<\/div>\n

A k\u00f3dot a saj\u00e1t nyomtat\u00e1si ig\u00e9nyeihez igaz\u00edthatja. P\u00e9ld\u00e1ul m\u00f3dos\u00edthatja a nyomtat\u00e1si tartom\u00e1nyt, hogy m\u00e1s cell\u00e1kat vagy tartom\u00e1nyokat is tartalmazzon, vagy m\u00f3dos\u00edthatja a p\u00e9ld\u00e1nyok sz\u00e1m\u00e1t \u00e9s az oldal t\u00e1jol\u00e1s\u00e1t. Tov\u00e1bbi parancsokat is hozz\u00e1adhat, p\u00e9ld\u00e1ul a pap\u00edrm\u00e9ret be\u00e1ll\u00edt\u00e1s\u00e1t vagy meghat\u00e1rozott oldalak nyomtat\u00e1s\u00e1t. <\/p>\n

4. l\u00e9p\u00e9s: A makr\u00f3 futtat\u00e1sa <\/div>\n

Miut\u00e1n meg\u00edrta \u00e9s testre szabta a k\u00f3dot, az F5 billenty\u0171 lenyom\u00e1s\u00e1val vagy a Visual Basic szerkeszt\u0151ben a „Futtat\u00e1s” gombra kattintva futtathatja a makr\u00f3t. Ez kinyomtatja az Excel-dokumentumot a megadott nyomtat\u00e1si be\u00e1ll\u00edt\u00e1sokkal. <\/p>\n

<\/div>\n

\u00d6sszefoglalva, az Excel VBA haszn\u00e1lat\u00e1val a nyomtat\u00e1shoz id\u0151t \u00e9s energi\u00e1t takar\u00edthat meg, k\u00fcl\u00f6n\u00f6sen akkor, ha rendszeresen nagy mennyis\u00e9g\u0171 adatot vagy dokumentumot kell kinyomtatnia. Egy makr\u00f3 be\u00e1ll\u00edt\u00e1s\u00e1val \u00e9s a k\u00f3d meg\u00edr\u00e1s\u00e1val automatiz\u00e1lhatja a nyomtat\u00e1si folyamatot, \u00e9s a saj\u00e1t ig\u00e9nyeihez igaz\u00edthatja azt. Egy kis gyakorl\u00e1ssal az automatiz\u00e1l\u00e1s mester\u00e9v\u00e9 v\u00e1lhat, \u00e9s racionaliz\u00e1lhatja Excel-feladatait.<\/p><\/div>\n

\n
FAQ<\/div>\n
\n
Hogyan haszn\u00e1lja a nyomtat\u00e1si parancsot Visual Basicben?<\/div>\n

A Visual Basicben a Print parancs seg\u00edts\u00e9g\u00e9vel k\u00fcldhet kimenetet egy nyomtat\u00f3ra vagy egy nyomtat\u00e1si el\u0151n\u00e9zeti ablakba. A Print parancs szintaxisa a k\u00f6vetkez\u0151: <\/p>\n

<\/div>\n

Print [output] <\/p>\n

<\/div>\n

Ahol a „output” a nyomtatni k\u00edv\u00e1nt sz\u00f6veg vagy adat. <\/p>\n

<\/div>\n

A Print parancs haszn\u00e1lat\u00e1hoz el\u0151sz\u00f6r meg kell nyitnia egy nyomtat\u00f3t vagy nyomtat\u00e1si el\u0151n\u00e9zeti ablakot a Visual Basic megfelel\u0151 m\u00f3dszereinek seg\u00edts\u00e9g\u00e9vel. Ha az ablak meg van nyitva, a Print paranccsal k\u00fcldhet\u00fcnk r\u00e1 kimenetet. <\/p>\n

<\/div>\n

\u00cdme egy p\u00e9lda a Print parancs haszn\u00e1lat\u00e1ra a Visual Basicben: <\/p>\n

<\/div>\n

1. Nyisson meg egy nyomtat\u00f3t vagy nyomtat\u00e1si el\u0151n\u00e9zeti ablakot a Visual Basic megfelel\u0151 m\u00f3dszereivel. <\/p>\n

<\/div>\n

2. A Print paranccsal k\u00fcldj\u00fcnk kimenetet a nyomtat\u00f3ra vagy az el\u0151n\u00e9zeti ablakba. P\u00e9ld\u00e1ul: <\/p>\n

<\/div>\n

Print „Hello, world!” <\/p>\n

<\/div>\n

3. Ism\u00e9telje meg a 2. l\u00e9p\u00e9st sz\u00fcks\u00e9g szerint, ha tov\u00e1bbi kimenetet szeretne k\u00fcldeni a nyomtat\u00f3ra vagy az el\u0151n\u00e9zeti ablakba. <\/p>\n

<\/div>\n

4. Z\u00e1rja be a nyomtat\u00f3t vagy az el\u0151n\u00e9zeti ablakot, amikor befejezte a Visual Basic megfelel\u0151 m\u00f3dszereinek haszn\u00e1lat\u00e1val. <\/p>\n

<\/div>\n

Vegye figyelembe, hogy a nyomtat\u00f3ra vagy az el\u0151n\u00e9zeti ablakba k\u00fcld\u00f6tt kimenet nemcsak sz\u00f6veget, hanem grafik\u00e1kat, t\u00e1bl\u00e1zatokat \u00e9s m\u00e1s t\u00edpus\u00fa adatokat is tartalmazhat. A Visual Basic form\u00e1z\u00e1si \u00e9s elrendez\u00e9si eszk\u00f6zeivel megtervezheti a kimenetet, miel\u0151tt azt a nyomtat\u00f3ra vagy az el\u0151n\u00e9zeti ablakba k\u00fcldi a Nyomtat\u00e1s parancs seg\u00edts\u00e9g\u00e9vel. <\/p>\n<\/div>\n

\n
Hogyan hozhatok l\u00e9tre nyomtat\u00e1si gombot az Excel VBA-ban?<\/div>\n

Ha nyomtat\u00e1si gombot szeretne l\u00e9trehozni az Excel VBA-ban, k\u00f6vesse az al\u00e1bbi l\u00e9p\u00e9seket: <\/p>\n

<\/div>\n

1. Nyissa meg azt az Excel munkalapot, ahol a nyomtat\u00e1si gombot szeretn\u00e9 l\u00e9trehozni. <\/p>\n

<\/div>\n

2. Nyomja meg az Alt + F11 billenty\u0171kombin\u00e1ci\u00f3t a Visual Basic szerkeszt\u0151 megnyit\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

3. A Visual Basic szerkeszt\u0151ben kattintson a Besz\u00far\u00e1s -> UserForm gombra egy \u00faj UserForm l\u00e9trehoz\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

4. H\u00fazzon egy parancsgombot az eszk\u00f6zt\u00e1rb\u00f3l a UserFormra. <\/p>\n

<\/div>\n

5. Kattintson dupl\u00e1n a parancsgombra a gomb k\u00f3dablak\u00e1nak megnyit\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

6. \u00cdrja be a k\u00f6vetkez\u0151 k\u00f3dot a k\u00f3dablakba: <\/p>\n

<\/div>\n

Private Sub CommandButton1_Click() <\/p>\n

<\/div>\n

ActiveSheet.PrintOut <\/p>\n

<\/div>\n

End Sub <\/p>\n

<\/div>\n

7. Z\u00e1rja be a k\u00f3dablakot, \u00e9s t\u00e9rjen vissza az Excel munkalapra. <\/p>\n

<\/div>\n

8. Kattintson a jobb gombbal a parancsgombra, \u00e9s v\u00e1lassza a Properties (Tulajdons\u00e1gok) lehet\u0151s\u00e9get. <\/p>\n

<\/div>\n

9. A Tulajdons\u00e1gok ablakban m\u00f3dos\u00edtsuk a Name tulajdons\u00e1got valami olyasmire, mint p\u00e9ld\u00e1ul „PrintButton”. <\/p>\n

<\/div>\n

10. Z\u00e1rja be a Tulajdons\u00e1gok ablakot. <\/p>\n

<\/div>\n

Most m\u00e1r van egy nyomtat\u00e1si gombja az Excel VBA-ban! Amikor a gombra kattint, az akt\u00edv lapot fogja kinyomtatni. Ha egy m\u00e1sik lapot szeretne kinyomtatni, m\u00f3dos\u00edthatja a k\u00f3dot, hogy megadhassa a nyomtatni k\u00edv\u00e1nt lapot. Ha p\u00e9ld\u00e1ul a Sheet2 lapot szeretn\u00e9 kinyomtatni, akkor a k\u00f6vetkez\u0151 k\u00f3dot haszn\u00e1lhatja: <\/p>\n

<\/div>\n

Private Sub CommandButton1_Click() <\/p>\n

<\/div>\n

Sheets(„Sheet2”).PrintOut <\/p>\n

<\/div>\n

End Sub <\/p>\n<\/div>\n

\n
Hogyan nyomtathatom ki a kiv\u00e1lasztott lapokat az Excelben makr\u00f3val?<\/div>\n

A kiv\u00e1lasztott lapok nyomtat\u00e1s\u00e1hoz az Excelben makr\u00f3 seg\u00edts\u00e9g\u00e9vel a k\u00f6vetkez\u0151 l\u00e9p\u00e9seket k\u00f6vetheti: <\/p>\n

<\/div>\n

1. Nyissa meg a nyomtatni k\u00edv\u00e1nt lapokat tartalmaz\u00f3 Excel munkaf\u00fczetet. <\/p>\n

<\/div>\n

2. Nyomja meg az Alt + F11 billenty\u0171kombin\u00e1ci\u00f3t a Visual Basic szerkeszt\u0151 megnyit\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

3. A szerkeszt\u0151ben kattintson a Besz\u00far\u00e1s > Modul gombra egy \u00faj modul besz\u00far\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

4. A modulban \u00edrja be a k\u00f6vetkez\u0151 k\u00f3dot: <\/p>\n

<\/div>\n

Sub PrintSelectedSheets() <\/p>\n

<\/div>\n

Dim sht As Worksheet <\/p>\n

<\/div>\n

For Each sht In ActiveWindow.SelectedSheets <\/p>\n

<\/div>\n

sht.PrintOut <\/p>\n

<\/div>\n

Next sht <\/p>\n

<\/div>\n

End Sub <\/p>\n

<\/div>\n

5. Mentse a makr\u00f3t a F\u00e1jl > Ment\u00e9s gombra kattintva. <\/p>\n

<\/div>\n

6. Z\u00e1rja be a Visual Basic szerkeszt\u0151t. <\/p>\n

<\/div>\n

7. Menjen vissza az Excel munkaf\u00fczet\u00e9hez, v\u00e1lassza ki a kinyomtatni k\u00edv\u00e1nt lapokat a lapok f\u00fcl\u00e9re kattintva, mik\u00f6zben lenyomva tartja a Ctrl billenty\u0171t. <\/p>\n

<\/div>\n

8. Kattintson a Fejleszt\u0151 > Makr\u00f3k gombra a Makr\u00f3k p\u00e1rbesz\u00e9dpanel megnyit\u00e1s\u00e1hoz. <\/p>\n

<\/div>\n

9. V\u00e1lassza ki a PrintSelectedSheets makr\u00f3t, \u00e9s kattintson a Futtat\u00e1s gombra. <\/p>\n

<\/div>\n

10. Az Excel automatikusan kinyomtatja a kiv\u00e1lasztott lapokat. <\/p>\n

<\/div>\n

Megjegyz\u00e9s: A makr\u00f3 futtat\u00e1sa el\u0151tt gy\u0151z\u0151dj\u00f6n meg arr\u00f3l, hogy a nyomtat\u00f3 megfelel\u0151en van-e be\u00e1ll\u00edtva, \u00e9s van-e el\u00e9g pap\u00edr a t\u00e1lc\u00e1ban.<\/p>\n<\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

Az Excel VBA (Visual Basic for Applications) egy hat\u00e9kony eszk\u00f6z, amely lehet\u0151v\u00e9 teszi az Excel-funkci\u00f3k automatiz\u00e1l\u00e1s\u00e1t \u00e9s testreszab\u00e1s\u00e1t. Az egyik legfontosabb automatiz\u00e1lhat\u00f3 funkci\u00f3 a nyomtat\u00e1s. A VBA haszn\u00e1lat\u00e1val be\u00e1ll\u00edthat bizonyos nyomtat\u00e1si be\u00e1ll\u00edt\u00e1sokat, p\u00e9ld\u00e1ul a p\u00e9ld\u00e1nysz\u00e1mot, az oldal t\u00e1jol\u00e1s\u00e1t \u00e9s a pap\u00edrm\u00e9retet, s\u0151t, bizonyos oldalakat vagy cellatartom\u00e1nyokat is kinyomtathat. Ebben a cikkben azt t\u00e1rgyaljuk, hogyan haszn\u00e1lhatja … Read more<\/a><\/p>\n","protected":false},"author":2323,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[8],"tags":[],"class_list":["post-16029","post","type-post","status-publish","format-standard","hentry","category-szamvitel-es-konyveles"],"_links":{"self":[{"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/posts\/16029","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/users\/2323"}],"replies":[{"embeddable":true,"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/comments?post=16029"}],"version-history":[{"count":0,"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/posts\/16029\/revisions"}],"wp:attachment":[{"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/media?parent=16029"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/categories?post=16029"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/megnyitasa.com\/tudas\/wp-json\/wp\/v2\/tags?post=16029"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}