Returns or sets the name of the active printer. Read/write String.
This example displays the name of the active printer.
MsgBox "The name of the active printer is " & _ Application.ActivePrinter