Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Представляет один диапазон последовательных слайдов или страниц для печати.
Замечания
Объект 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 и обратная связь.