Примечание.
Для доступа к этой странице требуется авторизация. Вы можете попробовать войти или изменить каталоги.
Для доступа к этой странице требуется авторизация. Вы можете попробовать изменить каталоги.
Семейство "Принтеры" содержит объекты принтеров , представляющие все принтеры, доступные в текущей системе.
Примечания
Используйте свойство Printers объекта Application , чтобы вернуть коллекцию Printers . Вы можете перечислять содержимое коллекции "Принтеры" с помощью параметра "Для каждые..." Следующее утверждение.
Ссылайтесь на отдельный объект принтера в коллекции " Принтеры ", указывая принтер по имени или на его индекс в коллекции.
Семейство "Принтеры " индексируется, начиная с нуля. Если вы ссылаетесь на принтер по его индексу, первый принтер — Printers(0), второй — Printers(1) и так далее.
Невозможно добавить или удалить объект принтера из коллекции "Принтеры ".
Пример
В следующем примере отображаются сведения обо всех принтерах, доступных для системы.
Dim prtLoop As Printer
For Each prtLoop In Application.Printers
With prtLoop
MsgBox "Device name: " & .DeviceName & vbCr _
& "Driver name: " & .DriverName & vbCr _
& "Port: " & .Port
End With
Next prtLoop
Свойства
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.