ActivePrinter im Makro
14.02.2014 09:23:18
Addi
ich habe unten stehendes Makro aufgezeichnet und steuere damit einen "NICHT-DEFAULT-PRINTER" an um auf darin enthaltenem Briefpapier zu drucken. Leider stellt sich anschließend der im Makro genannte Printer als Default Printer ein, ich möchte aber meinen Default Printer von vorher behalten.
Gibt es dafür einen Befehl den ich im Makro ergänzen kann?
Vielen Dank und Gruß
Addi
Sub Print_Letterhead_PRN_022()
' Print_Letterhead_PRN_022 Macro
ActivePrinter = "\\prt01oplvm\PRN-022_Letterhead on Ne06:"
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentWithMarkup, Copies:=1, Pages:="", PageType:= _
wdPrintAllPages, Collate:=True, Background:=True, PrintToFile:=False, _
PrintZoomColumn:=0, PrintZoomRow:=0, PrintZoomPaperWidth:=0, _
PrintZoomPaperHeight:=0
End Sub