Объект PrintRange (PowerPoint)
Представляет один диапазон последовательных слайдов или страниц для печати.
Замечания
Объект PrintRange является членом коллекции PrintRanges . Коллекция PrintRanges содержит все диапазоны печати, определенные для указанной презентации.
Диапазоны печати можно задать в коллекции PrintRanges независимо от параметра RangeType . эти диапазоны сохраняются до тех пор, пока загружается презентация, в которую они содержатся. Диапазоны в коллекции PrintRanges применяются, если свойству RangeType присвоено значение ppPrintSlideRange.
Пример
Используйте ranges (index), где index — это номер индекса диапазона печати, чтобы вернуть один объект PrintRange . В следующем примере отображается сообщение, указывающее начальный и конечный номера слайдов для диапазона печати в активной презентации.
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
Используйте метод Add, чтобы создать объект PrintRange и добавить его в коллекцию PrintRanges . В следующем примере определяются три диапазона печати, которые представляют слайд 1, слайды с 3 по 5 и слайды 8 и 9 в активной презентации, а затем выводит слайды в этих диапазонах.
With ActivePresentation.PrintOptions
.RangeType = ppPrintSlideRange
With .Ranges
.ClearAll
.Add 1, 1
.Add 3, 5
.Add 8, 9
End With
End With
ActivePresentation.PrintOut
См. также
Справочник по объектной модели PowerPoint
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.