Application.Printers

Property Printers As SystemPrinters

The Printers property returns the SystemPrinters collection object that contains a list of installed printers on the user’s system.

The Printers property returns a read-only value.

The following code example displays the name of the default printer and the port to which it is connected.

Sub Test() 
 If Printers.Count = 0 Then 
  MsgBox "There's no printer installed on the system." 
  Exit Sub 
 End If 
 MsgBox "Default printer is: " & Printers.Default.Name & _ 
  " on port: " & Printers.Default.Port 
End Sub