Si applica a
|
Oggetto Application |
|
Oggetto Form |
|
Oggetto Report |
Restituisce o imposta un oggetto Printer che rappresenta la stampante predefinita del sistema corrente. Lettura/scrittura.
espressione.Stampante
espressione Obbligatorio. Espressione che restituisce uno degli oggetti inclusi nell'elenco Si applica a.
Esempio
L'esempio seguente rende predefinita la prima stampante nella raccolta Stampanti per il sistema e quindi ne segnala il nome, le informazioni sui driver e sulla porta.
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
