Объект PrintRanges (PowerPoint)
Коллекция всех объектов PrintRange в указанной презентации. Каждый объект PrintRange представляет диапазон последовательных слайдов или страниц для печати.
Пример
Используйте свойство Ranges, чтобы вернуть коллекцию PrintRanges . В следующем примере очищаются все ранее определенные диапазоны печати из коллекции для активной презентации.
ActivePresentation.PrintOptions.Ranges.ClearAll
Используйте метод 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
Используйте 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
См. также
Справочник по объектной модели PowerPoint
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.
Обратная связь
https://aka.ms/ContentUserFeedback.
Ожидается в ближайшее время: в течение 2024 года мы постепенно откажемся от GitHub Issues как механизма обратной связи для контента и заменим его новой системой обратной связи. Дополнительные сведения см. в разделеОтправить и просмотреть отзыв по