Метод Window.PrintOut (Word)
Печатает весь или часть документа, отображаемого в указанном окне.
Синтаксис
expression. PrintOut (Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)
выражение (обязательно). Переменная, представляющая объект Window .
Параметры
| Имя | Обязательный или необязательный | Тип данных | Описание |
|---|---|---|---|
| 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 и обратная связь.