Se aplica a
|
Objeto Application |
|
Objeto Form |
|
Objeto Report |
Devuelve o establece un objeto Printer que representa la impresora predeterminada en el sistema actual. Lectura y escritura.
expresión.Printer
expresión Requerido. Una expresión que devuelve uno de los objetos de la lista Se aplica a.
Ejemplo
En el ejemplo siguiente, la primera impresora de la colección Printers se convierte en la impresora predeterminada del sistema y, después, se notifica su nombre e información sobre el controlador y el puerto.
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
