Printer.ColorEnabled

Property ColorEnabled As Boolean

Member of Printer

The ColorEnabled property returns whether an installed printer can print in color.

The ColorEnabled property returns a read-only value.

The following VBA example lists the model names of the installed printers that can print in color.

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.ColorEnabled = True Then

s = s & Prn.Type & vbCr

End If

Next intCounter

MsgBox "The following printers are able to print in color: " & vbCr & s

Set Prn = Nothing

End Sub