Método Application.PrintOut (Word)

Artigo
04/07/2023

Imprime todo o documento especificado ou parte dele.

Sintaxe

expressão. PrintOut (Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)

expressão Obrigatório. Uma variável que representa um objeto Application.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Background	Opcional	Variant	Defina como True para que a macro continue enquanto o Microsoft Word imprime o documento.
Append	Opcional	Variant	Defina como True para acrescentar o documento especificado como o nome de arquivo especificado pelo argumento OutputFileName. False para substituir o conteúdo da OutputFileName.
Range	Opcional	Variant	O intervalo de página. Pode ser qualquer constante WdPrintOutRange.
Outputfilename	Opcional	Variant	Se PrintToFile for True, este argumento especificará o caminho e o nome do arquivo de saída.
From	Opcional	Variant	O número de página inicial quando Range é definido como wdPrintFromTo.
To	Opcional	Variant	O número de página final quando Range é definido como wdPrintFromTo.
Item	Opcional	Variant	O item a ser impresso. Pode ser qualquer constante WdPrintOutItem.
Copies	Opcional	Variant	O número de cópias a ser impresso.
Pages	Opcional	Variant	Os números de páginas e intervalos de páginas a serem impressos, separados por vírgulas. Por exemplo, "2, 6-10" imprime a página 2 e as páginas 6 a 10.
PageType	Opcional	Variant	O tipo de páginas a serem impressas. Pode ser qualquer constante WdPrintOutPages.
PrintToFile	Opcional	Variant	True para enviar instruções de impressora para um arquivo. Certifique-se de especificar um nome de arquivo com OutputFileName.
Collate	Opcional	Variant	Ao imprimir várias cópias de um documento, True para imprimir todas as páginas do documento antes de imprimir a próxima cópia.
FileName	Opcional	Variant	O nome de arquivo e caminho do documento a ser impresso. Se esse argumento for omitido, o Word imprime o documento ativo. (Disponível somente com o objeto Application.)
ActivePrinterMacGX	Opcional	Variant	Este argumento está disponível somente no Microsoft Office Macintosh Edition. Para obter informações adicionais sobre este argumento, consulte a ajuda de referência da linguagem incluída com o Microsoft Office Macintosh Edition.
ManualDuplexPrint	Opcional	Variant	True para imprimir um documento de dois lados em uma impressora sem um kit de impressão duplex. Se esse argumento for True, os PrintBackground e as propriedades de PrintReverse serão ignoradas. Use as propriedades PrintOddPagesInAscendingOrder e PrintEvenPagesInAscendingOrder para controlar a saída durante a impressão duplex manual. Este argumento pode não estar disponível, dependendo do suporte a idioma (inglês americano, por exemplo) que você selecionou ou instalou.
PrintZoomColumn	Opcional	Variant	O número de página que você deseja que o Word ajuste horizontalmente em uma página. Pode ser 1, 2, 3 ou 4. Use com o argumento PrintZoomRow para imprimir várias páginas em uma única folha.
PrintZoomRow	Opcional	Variant	O número de páginas que você deseja que o Word ajuste verticalmente em uma página. Pode ser 1, 2 ou 4. Use com o argumento PrintZoomColumn para imprimir várias páginas em uma única folha.
PrintZoomPaperWidth	Opcional	Variantes	A largura para a qual você deseja que o Word dimensione páginas impressas, em twips (20 twips = 1 ponto; 72 pontos = 1 polegada).
PrintZoomPaperHeight	Opcional	Variantes	A altura para a qual você deseja que o Word dimensione páginas impressas, em twips (20 twips = 1 ponto; 72 pontos = 1 polegada).

Exemplo

Este exemplo imprime uma página atual do documento ativo.

ActiveDocument.PrintOut Range:=wdPrintCurrentPage

Este exemplo imprime todos os documentos da pasta atual. A função Dir é usada para retornar todos os nomes de arquivos que possuem a extensão de nome de arquivo ".doc".

adoc = Dir("*.DOC") 
Do While adoc <> "" 
 Application.PrintOut FileName:=adoc 
 adoc = Dir() 
Loop

Este exemplo imprime as três primeiras páginas do documento na janela ativa.

ActiveDocument.ActiveWindow.PrintOut _ 
 Range:=wdPrintFromTo, From:="1", To:="3"

Este exemplo imprime os comentários do documento ativo.

If ActiveDocument.Comments.Count >= 1 Then 
 ActiveDocument.PrintOut Item:=wdPrintComments 
End If

Este exemplo imprime o documento ativo, ajustando seis páginas em cada folha.

ActiveDocument.PrintOut PrintZoomColumn:=3, _ 
 PrintZoomRow:=2

Este exemplo imprime o documento ativo com 75% de seu tamanho real.

ActiveDocument.PrintOut _ 
 PrintZoomPaperWidth:=0.75 * (8.5 * 1440), _ 
 PrintZoomPaperHeight:=0.75 * (11 * 1440)

Confira também

Objeto de Aplicativo

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.

Share via