Hallo Helfer,
ich wechsele an meinem Arbietsplatz öfter mal den Drucker, um auf unserem Firmenpapier zu drucken. Das möchte ich in Zukunft per Makro vereinfachen, dazu habe ich das folgende Makro aufgezeichnet:
Sub OKI_Schacht1()
'
' Makro am 11.05.2011 von wh aufgezeichnet
Application.ActivePrinter = "\\dc2\E1-BBS-OKI auf Ne05:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"\\dc2\E1-BBS-OKI auf Ne05:", Collate:=True
End Sub
Während der Aufzeichnung habe ich aber auch unter "Eigenschaften" den Papierschacht von "Standard" auf "Schacht1" geändert, gedruckt wurde in dem Moment auch auf dem richtigen Papier, diese Änderung wurde aber nicht mit aufgezeichnet. Wie kann ich das manuell ergänzen?
mfg
Wolfgang