Classe PrintRange (PowerPoint VBA)

A classe PrintRange representa um único intervalo de slides ou páginas consecutivas a serem impressas.

Para usar uma variável de classe PrintRange, ela primeiro precisa ser instanciada por exemplo

Dim pre as PrintRange
Set pre = ActivePresentation.PrintOptions.Ranges(Index:=1)

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo PrintRange: PrintRanges.Add e PrintRanges.Item.

Delete

Exclui o objeto PrintRange especificado.

ActivePresentation.PrintOptions.Ranges(1).Delete

End

Retorna o número do último slide do intervalo de impressão especificado. Somente leitura.

Dim lngEnd As Long
lngEnd = ActivePresentation.PrintOptions.Ranges(1).End

Start

Retorna o número do primeiro slide no intervalo de slides a serem impressos. Somente leitura.

Dim lngStart As Long
lngStart = ActivePresentation.PrintOptions.Ranges(1).Start