Application.Printer Property

Access Developer Reference

Returns or sets a Printer object representing the default printer on the current system. Read/write.



expression A variable that represents an Application object.


The following example makes the first printer in the Printers collection the default printer for the system, and then reports its name, driver information, and port information.

Visual Basic for Applications
  Dim prtDefault As Printer

Set Application.Printer = Application.Printers(0)

Set prtDefault = Application.Printer

With prtDefault
    MsgBox "Device name: " & .DeviceName & vbCr _
        & "Driver name: " & .DriverName & vbCr _
        & "Port: " & .Port
End With