Объект SlideRange (PowerPoint)
Коллекция, представляющая страницу заметок или диапазон слайдов, которая представляет собой набор слайдов, которые могут содержать как один слайд, так и все слайды в презентации.
Замечания
Чтобы создать диапазон слайдов, можно указать нужные слайды( выбранные из всех слайдов в презентации или из всех слайдов в выделенном фрагменте). Например, можно создать коллекцию SlideRange , содержащую первые три слайда в презентации, все выбранные слайды в презентации или все заглавные слайды в презентации.
Так же, как вы можете работать с несколькими слайдами одновременно в пользовательском интерфейсе, выбрав их и применив команду, вы можете работать с несколькими слайдами одновременно программным способом, создав коллекцию SlideRange и применив к ней свойства или методы. И так же, как некоторые команды в пользовательском интерфейсе, работающие на отдельных слайдах, недопустимы при выборе нескольких слайдов, некоторые свойства и методы, работающие с объектом Slide или в коллекции SlideRange , содержащей только один слайд, завершатся ошибкой, если они применяются к коллекции SlideRange , содержащей несколько слайдов. Как правило, если вы не можете выполнить что-либо вручную при выделении нескольких слайдов (например, возврат отдельных фигур на одном из слайдов), вы не можете сделать это программным способом с помощью коллекции SlideRange , содержащей несколько слайдов.
Для тех операций, которые работают в пользовательском интерфейсе независимо от того, выбран один слайд или несколько слайдов (например, копирование выделения в буфер обмена или настройка заливки фона слайда), связанные свойства и методы будут работать с коллекцией SlideRange , содержащей несколько слайдов. Ниже приведены некоторые общие рекомендации по поведению этих свойств и методов при их применении к нескольким слайдам.
Применение метода к коллекции SlideRange эквивалентно применению метода ко всем объектам Slide в этом диапазоне в виде группы.
Задание значения свойства коллекции SlideRange эквивалентно настройке значения свойства на каждом слайде в этом диапазоне по отдельности (для свойства, которое принимает перечисляемый тип, установка значения "Mixed" не имеет значения).
Свойство коллекции SlideRange , возвращающее перечислимый тип, возвращает значение свойства для отдельного слайда в коллекции, если все слайды в коллекции имеют одинаковое значение для этого свойства. Если слайды в коллекции не имеют одинаковых значений для свойства, свойство возвращает значение Mixed.
Свойство коллекции SlideRange , которое возвращает простой тип данных (например, Long, Single или String), возвращает значение свойства для отдельного слайда в коллекции, если все слайды в коллекции имеют одинаковое значение для этого свойства. Если слайды в коллекции имеют не одно и то же значение для свойства, свойство вернет значение 2 или создаст ошибку. Например, при использовании свойства Name в объекте SlideRange , который содержит несколько слайдов, будет возникать ошибка, так как каждый слайд имеет разное значение для своего свойства Name .
Некоторые свойства форматирования слайдов задаются не свойствами и методами, которые применяются непосредственно к коллекции SlideRange , а свойствами и методами, которые применяются к объекту, содержащемуся в коллекции SlideRange , например объекту ColorScheme . Если автономный объект представляет операции, которые можно выполнить с несколькими объектами в пользовательском интерфейсе, вы сможете вернуть объект из коллекции SlideRange , содержащей несколько слайдов, а его свойства и методы будут соответствовать предыдущим правилам. Например, можно использовать свойство ColorScheme для возврата объекта ColorScheme , представляющего цветовые схемы, используемые на всех слайдах в указанной коллекции SlideRange . При задании свойств для этого объекта ColorScheme эти свойства также будут заданы для объектов ColorScheme на всех отдельных слайдах в коллекции SlideRange .
В следующих примерах описано, как:
Возвращает набор слайдов, указанных по имени или номеру индекса.
Возврат всех или некоторых выбранных слайдов в презентации
Возврат страницы заметок
Применение свойств и методов к диапазону слайдов
Пример
Используйте Slides.Range (index), где index — это имя или номер индекса слайда или массив, содержащий имена или индексы слайдов, чтобы вернуть коллекцию SlideRange , представляющую набор слайдов в презентации. Используйте функцию Array для создания массива имен или номеров индексов. В следующем примере задается фоновая заливка для слайдов на один и три в активной презентации.
With ActivePresentation.Slides.Range(Array(1, 3))
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
В следующем примере задается фоновая заливка для слайдов с именами "Введение" и "Большая диаграмма" в активной презентации. Обратите внимание, что слайдам присваиваются автоматически созданные имена формы Sliden (где n — целое число) при их создании. Чтобы присвоить слайду более понятное имя, используйте свойство Name.
With ActivePresentation.Slides.Range(Array("Intro", "Big Chart"))
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
Хотя вы можете использовать метод Rangeдля возврата любого количества слайдов, проще использовать метод Item, если требуется вернуть только один член коллекции SlideRange . Например, проще, Slides(1)
чем Slides.Range(1)
.
Используйте свойство SlideRangeобъекта Selection , чтобы вернуть все слайды в выделенном фрагменте. В следующем примере настраивается заливка фона для всех выбранных слайдов в окне 1, при условии, что выбран хотя бы один слайд.
With Windows(1).Selection.SlideRange
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
Используйте Selection.SlideRange (index), где index — это имя или номер индекса, чтобы вернуть один слайд из выделенного фрагмента. В следующем примере задается фоновая заливка для двух слайдов в коллекции выбранных слайдов в окне 1, при условии, что выбрано по крайней мере два слайда.
With Windows(1).Selection.SlideRange(2)
.FollowMasterBackground = False
.Background.Fill.PresetGradient msoGradientHorizontal, _
1, msoGradientLateSunset
End With
Используйте свойство NotesPage , чтобы вернуть коллекцию SlideRange , представляющую указанную страницу заметок. В следующем примере текст вставляется в заполнитель два (область заметок) на странице заметок для слайда 1 в активной презентации.
ActivePresentation.Slides(1).NotesPage.Shapes _
.Placeholders(2).TextFrame.TextRange.InsertAfter "Added Text"
См. также
Справочник по объектной модели PowerPoint
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.