Office: Makro für zwei Seiten auf einer drucken

Hallo,

ich habe eine große Datei der ich über ein Makro beigebracht habe unterschiedliche Bereiche auf unterschiedliche Seiten zu drucken.


Option Explicit

Sub Drucke_meine_Bereiche()
Application.Goto Reference:="Bereich1"
Selection.PrintOut Copies:=1, Collate:=True
Application.Goto Reference:="Bereich2"
Selection.PrintOut Copies:=1, Collate:=True
Application.Goto Reference:="Bereich3"
Selection.PrintOut Copies:=1, Collate:=True
Application.Goto Reference:="Bereich4"
Selection.PrintOut Copies:=1, Collate:=True
End Sub


Nun möchte ich, einfach nur zwei Seiten (zwei dieser Bereiche) auf eine Seite gedurck haben.
Wenn ich nur die Druckeigenschaften vor dem Aktivieren des Makros einstelle, bringt das nicht. Es wird trotzdem je Bereich eine Seite gedruckt.

Bitte um Hilfe.
Vielen Dank

 

Hi,

ich glaube, Du bist hier im falschen Forum. Das sollte wohl ein Excelproblem sein oder?!

PS: eine Lösung wüsste ich jetzt auf Anhieb auch nicht und müsste es testen...)

 

ohhh

Hallo,

ohh.... da bin ich wohl falsch reingerutscht... :lol:
Danke für den Hinweis.

Soll ich nun mein Problem ins Excel-Forum kopieren oder soll ich warten / hoffen, dass ich von "euch" umgehängt werde?

Schönen Gruß