Objeto PrintRange (PowerPoint)

Representa um único intervalo de slides ou páginas consecutivas a serem impressas.

Comentários

O objeto PrintRange é um membro da coleção PrintRanges. A coleção PrintRanges contém todos os intervalos de impressão que tiverem sido definidos para a apresentação especificada.

Você pode definir intervalos de impressão da coleção PrintRanges independente da configuração RangeType; Esses intervalos são mantidos desde que a apresentação que estão contidos em é carregada. Os intervalos da coleção PrintRanges são aplicados quando a propriedade RangeType é definida como ppPrintSlideRange.

Exemplo

Use Intervalos (índice), em que o índice é o número de índice do intervalo de impressão, para retornar um único objeto PrintRange . O exemplo a seguir exibe uma mensagem que indica o inicial e final números de slide intervalo de impressão um da apresentação ativa.

With ActivePresentation.PrintOptions.Ranges
    If .Count > 0 Then
        With .Item(1)
            MsgBox "Print range 1 starts on slide " & .Start & _
                " and ends on slide " & .End
        End With
    End If
End With

Use o método Add para criar um objeto PrintRange e adicioná-lo à coleção PrintRanges. O exemplo a seguir define três intervalos de impressão que representam o slide 1, slides de 3 a 5 e os slides 8 e 9 da apresentação ativa e, em seguida, imprime os slides desses intervalos.

With ActivePresentation.PrintOptions

    .RangeType = ppPrintSlideRange

    With .Ranges

        .ClearAll

        .Add 1, 1

        .Add 3, 5

        .Add 8, 9

    End With

End With

ActivePresentation.PrintOut

Confira também

Referência de modelo de objeto do PowerPoint

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.