Método Presentation.PrintOut (PowerPoint)
Imprime a apresentação especificada.
Sintaxe
expressão. PrintOut (De, para, PrintToFile, Cópias, Collate)
Expressão Uma variável que representa um objeto Presentation .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| De | Opcional | Integer | The number of the first page to be printed. Se esse argumento for omitido, a impressão começará no início da apresentação. Especificando para e dos argumentos define o conteúdo do objeto PrintRanges e define o valor da propriedade RangeType para a apresentação. |
| To | Opcional | Integer | The number of the last page to be printed. Se esse argumento for omitido, a impressão continua até o final da apresentação. Especificando para e dos argumentos define o conteúdo do objeto PrintRanges e define o valor da propriedade RangeType para a apresentação. |
| PrintToFile | Opcional | String | O nome do arquivo a ser impresso. Se você especificar esse argumento, o arquivo será impresso para um arquivo, e não enviado para um impressora. Se esse argumento for omitido, o arquivo será enviado para a impressora. |
| Copies | Opcional | Integer | O número de cópias a ser impresso. Se esse argumento for omitido, apenas uma cópia é impressa. Especificar este argumento define o valor da propriedade NumberOfCopies . |
| Collate | Opcional | MsoTriState | Se esse argumento for omitido, serão coladas múltiplas cópias. A especificação desse argumento define o valor da propriedade Collate. |
Comentários
O valor do parâmetro Collate pode ser uma destas constantes MsoTriState.
| Constante | Descrição |
|---|---|
| msoFalse | Imprime todas as cópias de uma página antes de imprimir a primeira cópia da próxima. |
| msoTrue | Imprime uma cópia completa da apresentação antes da primeira página da cópia seguinte ser impressa. |
Exemplo
Este exemplo imprime duas cópias não coletadas de cada slide, visíveis ou ocultas, do slide dois ao slide cinco na apresentação ativa.
With Application.ActivePresentation
.PrintOptions.PrintHiddenSlides = True
.PrintOut From:=2, To:=5, Copies:=2, Collate:=msoFalse
End With
Este exemplo imprime uma única cópia de todos os slides da apresentação ativa para o arquivo Testprnt.prn.
Application.ActivePresentation.PrintOut PrintToFile:="TestPrnt"
Confira também
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.