Поделиться через


Объект 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 и обратная связь.