Printen via VBA in Excel

[Senso]

Ik zoek VBA die vaste bereiken/vast patroon vd bankrekening kan printen.
bereik 1 Is kolom A-B-C-D-E en rij 1 tm 40 staat een bankrekening
bereik 2 Is kolom E-F-G-H-I en rij 1 tm 40
bereik 3 Is kolom I-J-K-L-M en rij 1 tm 40
Deze bereiken bevatten dus verschillende bankrekeningen.
etc
om bij printen telkens een bereik te selecteren vind ik lastig en kost tijd.

Kan/wil iemand een VBA schrijven waar dus meerdere opdrachtregels instaan (in en uit te schakelen) dan kan ik dat zelf bewerken wat nodig is te printen en dat dit printen een beetje automatisch gaat.

 

[edmoor]

Geef die bereiken een naam en gebruik die naam bij het afdrukken.
Of plaats een voorbeeld document.

 

[Senso]

Of plaats een voorbeeld document.

Wil jij jouw bankgegevens dan eerst even hier plaatsen?

Geef die bereiken een naam en gebruik die naam bij het afdrukken.

Zou niet weten hoe dat moet. Zal het proberen te vinden.

 

[edmoor]

Je begrijpt het concept van een "voorbeeld"?

 

[AHulpje]

Een beginnetje:

Sub PrintBankafschriften()
    With ActiveSheet
        .PageSetup.PrintArea = "$A$1:$E$40"
        .PrintOut Copies:=1
        .PageSetup.PrintArea = "$F$1:$J$40"
        .PrintOut Copies:=1
        .PageSetup.PrintArea = "$K$1:$O$40"
        .PrintOut Copies:=1
    End With
End Sub

En verwerkt in een document, start macro met Alt+F8, Enter:

 

[Senso]

Je begrijpt het concept van een "voorbeeld"?

De laatste tijd begrijp ik niet zo veel meer.

Ik kan een bereik een naam geven, echter waar staat dan die printfunctie? Excel 2007.
Ik geloof dat ik het begrijp. Naam geven > bij het pijltje links de juiste naam kiezen > Printen > selectie en printen. Nog even wat oefenen dan.

 

[edmoor]

Zie het voorbeeld van AHulpje.
Zo kan het zonder de bereiken een naam te geven.

 

[HSV]

Haal de drie komma's en de -1 weg als het naar je zin is.

Sub PrintBankafschriften()
 Range("a1:e40").PrintOut , , , -1
 Range("f1:j40").PrintOut , , , -1
 Range("k1:o40").PrintOut , , , -1
End Sub

 

[Senso]

Ik denk dat ik een probleem krijg met namen geven als ik een rekening invoeg want er staat allemaal $ in de verwijzingen.
Als ik bij > Namen gebruiken > Relatief/absoluut negeren uitvink dan werkt dit niet.