Platí pro
|
Objekt Application |
|
Objekt Form |
|
Objekt Report |
Vrátí nebo nastaví objekt Printer představující výchozí tiskárnu v aktuálním systému. Čtení/zápis
výraz.Printer
Výraz Povinný argument. Výraz, který vrátí jeden z objektů v seznamu Platí pro.
Příklad
Následující příklad nastaví první tiskárnu v kolekci Printers jako výchozí tiskárnu systému a pak oznámí její název, informace o ovladači a informace o portu.
Dim prtDefault As Printer
Set Application.Printer = Application.Printers(0)
Set prtDefault = Application.Printer
With prtDefault
MsgBox "Device name: " & .DeviceName & vbCr _
& "Driver name: " & .DriverName & vbCr _
& "Port: " & .Port
End With
