Applies to
|
Application Object |
|
Form Object |
|
Report Object |
Returns or sets a Printer object representing the default printer on the current system. Read/write.
expression.Printer
expression Required. An expression that returns one of the objects in the Applies To list.
Example
The following example makes the first printer in the Printers collection the default printer for the system, and then reports its name, driver information, and port information.
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
