ActivePrinter Property Example
This example displays the name of the active printer.
MsgBox "The name of the active printer is " _ & Application.ActivePrinter