S’applique à
|
Objet Application |
|
Objet Form |
|
Objet Report |
Renvoie ou définit un objet Printer représentant l’imprimante par défaut sur le système actuel. Lecture/écriture.
expression.Printer
expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.
Exemple
L’exemple suivant définit la première imprimante dans la collection Imprimantes en tant qu’imprimante par défaut pour le système, et rapporte son nom, les informations sur son pilote et les informations sur son port.
Dim prtDefault As PrinterSet Application.Printer = Application.Printers(0)Set prtDefault = Application.PrinterWith prtDefault MsgBox "Device name: " & .DeviceName & vbCr _ & "Driver name: " & .DriverName & vbCr _ & "Port: " & .PortEnd With
