ActivePrinter Property Example

This example displays the name of the active printer.

MsgBox "The name of the active printer is " & ActivePrinter

This example makes a network HP LaserJet IIISi printer the active printer.

ActivePrinter = "HP LaserJet IIISi on \\printers\laser"

This example makes a local HP LaserJet 4 printer on LPT1 the active printer.

ActivePrinter = "HP LaserJet 4 local on LPT1:"