Per Makro in Excel aktiven Drucker bestimmen

Wie Sie den aktiven Drucker mit einem Makro auslesen und festlegen

Per Makro den Drucker auszuwählen, ist eine interessante Anwendung. Sie können das Verfahren einsetzen, um automatisch Kopien von Dokumenten auf bestimmten Druckern auszugeben.

Welcher Drucker aktuell in Ihrem System der eingestellte Drucker ist, fragen Sie über die Eigenschaft Application.ActivePrinter ab:

Sub AktuellenDruckerAnzeigen()

MsgBox (Application.ActivePrinter)

End Sub

Das Makro zeigt den Namen des aktuell eingestellten Druckers in einem Dialogfenster dar, wie die folgende Abbildung verdeutlicht:

Wenn Sie den Drucker selbst festlegen möchten, führen Sie eine Wertzuweisung an diese Eigenschaft durch, wie das folgende Makro zeigt:

Sub AktuellenDruckerFestlegen()

Application.ActivePrinter = "Dell Laser MFP 1815 PS auf Ne06:"

End Sub

Verwenden Sie den Namen des Druckers hier genauso, wie Sie ihn über die Eigenschaft ActivePrinter zuvor festgelegt haben.