Printer.Description

Property Description As String

Member of Printer

The Description property returns the description of a printer.

The Description property returns a read-only value.

The following VBA example lists the model names and descriptions of all installed printers.

Sub Test()

Dim intCounter As Integer

Dim Prn As Printer

Dim s As String

For intCounter = 1 To Printers.Count

Set Prn = Printers(intCounter)

If Prn.Description <> "" Then

s = s & Prn.Type & " - " & Prn.Description & vbCr

End If

Next intCounter

MsgBox "The following printers are installed on your system: " & vbCr & vbCr & s

Set Prn = Nothing

End Sub