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 PrinterSet Application.Printer = Application.Printers(0)Set prtDefault = Application.PrinterWith prtDefault MsgBox "Device name: " & .DeviceName & vbCr _ & "Driver name: " & .DriverName & vbCr _ & "Port: " & .PortEnd With
