No version of Excel supports a Printers property, but you can use WMI:
Code:
Dim Printer As Object
For Each Printer In GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2"). _
ExecQuery("Select * from Win32_Printer")
MsgBox Printer.Name
Next