Returns the printer name
Syntax:
Property Get Name() As String
Remarks:
The Name property returns a read-only value containing the name of a printer.
Examples:
The following VBA example lists the names 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)
  s = s & Prn.Name & vbCr
Next intCounter
MsgBox "The following printers are installed on your system: " & vbCr & vbCr & s
Set Prn = Nothing 
End Sub