Метод Application.PrintOut (Word)
Печатает весь документ или его часть.
Синтаксис
expression. PrintOut (Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)
выражение (обязательно). Переменная, представляющая объект Application .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| Background | Необязательный | Variant | Установите значение True , чтобы макрос продолжался во время печати документа в Microsoft Word. |
| Добавить | Необязательный | Variant | Задайте значение True , чтобы добавить указанный документ к имени файла, указанному аргументом OutputFileName. Значение false для перезаписи содержимого OutputFileName. |
| Range | Необязательный | Variant | Диапазон страниц. Может быть любой константой WdPrintOutRange . |
| OutputFileName | Необязательный | Variant | Если параметр PrintToFile имеет значение True, этот аргумент указывает путь и имя файла вывода. |
| From | Необязательный | Variant | Номер начальной страницы, если параметр Range имеет значение wdPrintFromTo. |
| Для | Необязательный | Variant | Номер конечной страницы, если для параметра Range задано значение wdPrintFromTo. |
| Элемент | Необязательный | Variant | Печатаемый элемент. Может быть любой константой WdPrintOutItem . |
| Copies | Необязательный | Variant | Количество печатаемых копий. |
| Pages | Необязательный | Variant | Номера страниц и диапазоны страниц для печати, разделенные запятыми. Например, "2, 6–10" выводит страницы 2 и страницы с 6 по 10. |
| PageType | Необязательный | Variant | Тип печатаемых страниц. Может быть любой константой WdPrintOutPages . |
| PrintToFile | Необязательный | Variant | Значение True для отправки инструкций принтера в файл. Обязательно укажите имя файла с помощью outputFileName. |
| Collate | Необязательный | Variant | При печати нескольких копий документа значение True для печати всех страниц документа перед печатью следующей копии. |
| FileName | Необязательный | Variant | Путь и имя файла для печати документа. Если этот аргумент опущен, Word выводит активный документ. (Доступно только для объекта Application .) |
| ActivePrinterMacGX | Необязательный | Variant | Этот аргумент доступен только в Microsoft Office Macintosh Edition. Дополнительные сведения об этом аргументе см. в справке по языку, включенной в Microsoft Office Macintosh Edition. |
| ManualDuplexPrint | Необязательный | Variant | Значение true для печати двустороннего документа на принтере без комплекта дуплексной печати. Если этот аргумент имеет значение True, свойства PrintBackground и PrintReverse игнорируются. Используйте свойства PrintOddPagesInAscendingOrder и PrintEvenPagesInAscendingOrder для управления выходными данными во время дуплексной печати вручную. Этот аргумент может быть вам недоступен в зависимости от выбранной или установленной языковой поддержки (например, английский язык США). |
| PrintZoomColumn | Необязательный | Variant | Количество страниц, которое нужно разместить в Word по горизонтали на одной странице. Может быть 1, 2, 3 или 4. Используйте с аргументом PrintZoomRow для печати нескольких страниц на одном листе. |
| PrintZoomRow | Необязательный | Variant | Количество страниц, которое нужно разместить в Word по вертикали на одной странице. Может быть 1, 2 или 4. Используйте с аргументом PrintZoomColumn для печати нескольких страниц на одном листе. |
| PrintZoomPaperWidth | Необязательный | Variant | Ширина, до которой word будет масштабировать печатные страницы в виде твипов (20 твипов = 1 точка; 72 точки = 1 дюйм). |
| PrintZoomPaperHeight | Необязательный | Variant | Высота, до которой приложение Word будет масштабировать печатные страницы в виде твипов (20 твипов = 1 точка; 72 точки = 1 дюйм). |
Пример
В этом примере выводится текущая страница активного документа.
ActiveDocument.PrintOut Range:=wdPrintCurrentPage
В этом примере печатаются все документы в текущей папке. Функция Dir используется для возврата всех имен файлов с расширением ".doc".
adoc = Dir("*.DOC")
Do While adoc <> ""
Application.PrintOut FileName:=adoc
adoc = Dir()
Loop
В этом примере первые три страницы документа печатаются в активном окне.
ActiveDocument.ActiveWindow.PrintOut _
Range:=wdPrintFromTo, From:="1", To:="3"
В этом примере примечания в активном документе выводятся.
If ActiveDocument.Comments.Count >= 1 Then
ActiveDocument.PrintOut Item:=wdPrintComments
End If
В этом примере выводится активный документ, на каждом листе по шесть страниц.
ActiveDocument.PrintOut PrintZoomColumn:=3, _
PrintZoomRow:=2
В этом примере активный документ выводится на 75 % от фактического размера.
ActiveDocument.PrintOut _
PrintZoomPaperWidth:=0.75 * (8.5 * 1440), _
PrintZoomPaperHeight:=0.75 * (11 * 1440)
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.