Ich habe folgende 4 Druckbereiche festgelegt:
Sub Mehrfach()
ActiveSheet.PageSetup.PrintArea = "$X$1:$AD$55,$L$1:$P$220,$A$1:$J$441,$L$221:$P$441,$A$442:$J$462"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
Die Druckbereiche sehen etwas so aus: insgesamt ergeben sich 19 Seiten
|.......|
|..2...|....1
|.......|_____
|.......|
|___|....3
|.......|_____
|..4...|
Excel sollte mir nun diese Reihenfolge ausdrucken. Tut es aber nicht. Sondern es druckt 1 ; 3 ; 2; 4
Wie kriege ich es hin, das die im Code angegebene Reihenfolge ausgedruckt wird.
Dabei ist es wichtig, das keine seperaten Druckanweisungen gegeben werden weil die ausgedruckten Seiten eine durchgehende Nummerierung in der Fußzeile haben sollen.
Danke Gruß Kersten