Метод 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)

См. также

Объект Application

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.