Das folgende Beispiel zeigt den Namen des aktiven Druckers an.
MsgBox "The name of the active printer is " & _ Application.ActivePrinter