ich habe auf einer Seite 2 Druckbereiche. Ich möchte diese jeweils auf einer Seite ausdrucken. Einer ist im Hoch-, der andere ist im Querformat. Mit meinem Makro kann ich beide Seiten ausdrucken, aber nur hoch oder quer.
Natürlich lässt sich das lösen, indem ich den 2. Druckbereich auf ein anderes Arbeitsblatt lege - dann kann ich einen hoch, den anderen quer einrichten, aber gibt es noch eine andere Möglichkeit? Wie gesagt, ein Druckbereich hoch, einer quer auf einer Seite wäre das Ziel (googlen hat nichts gebracht).
Hier mein verwendetes Makro (druck 2 Seiten).
Sub Druck_ER_mit_Beleg()
With ActiveSheet
.Range("Druckbereich").PrintOut Copies:=1, Collate:=True
End With
With Sheets("ER_Belege")
.Range("Druckbereich").PrintOut Copies:=1, Collate:=True
End With
Danke vorab!
Jürgen