Hallo zusammen,

über folgende Zeile wird aktuell per Makro das Blatt "Druck" ausgedruckt:

wsDruck.PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False

Anscheinend nutzt dieser Code die beim lezten Aufruf der Excel-Druckmaske gewählten Parameter. Ich hätte es aber gern so, dass beim Ausführen dieses Codes immer farbig gedruckt und immer das dritte Papierfach gewählt wird. Internetrecherche hat mich noch nicht ans Ziel gebracht. Das einzige, was ich herausfinden konnte, war der Name des Druckers ("Toshiba01 auf Ne01") via:

Sub AktivenDrucker_anzeigen()
MsgBox "Name-AktiverDrucker: " & Application.ActivePrinter
End Sub

Habt ihr Ideen, wie sich das einrichten ließe?
Viele Grüße
Daniel