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