Partilhar via


Método Application.PrintOut (Word)

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.