Van toepassing op
|
Application-object |
|
Formulierobject |
|
Rapportobject |
Retourneert een Printer-object dat de standaardprinter voor het huidige systeem vertegenwoordigt of stelt dit object in. Lezen/schrijven.
expressie.Printer
expressie Vereist. Een expressie die een van de objecten in de lijst Van toepassing op retourneert.
Voorbeeld
In het volgende voorbeeld wordt de eerste printer in de verzameling Printers als standaardprinter voor het systeem ingesteld, waarna de naam, stuurprogrammagegevens en poortgegevens worden gerapporteerd.
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
