Применение
|
Объект Application |
|
Объект Form |
|
Объект Report |
Возвращает или задает объект Printer , представляющий принтер, который используется по умолчанию в текущей системе. Значение данного свойства доступно для чтения и записи.
выражение.Printer
Выражение Обязательный. Выражение, возвращающее один из объектов в списке Применяется к.
Пример
В следующем примере первый принтер в коллекции Printers становится принтером по умолчанию для системы, а затем возвращаются его имя, сведения о драйвере и порт.
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