MyTetra Share
Делитесь знаниями!
Объект слайды (PowerPoint)
16.03.2019
23:43
Текстовые метки: VBA PowerPoint,Slides
Раздел: !Закладки - VBA - PowerPoint

Объект слайды (PowerPoint)

office 365 dev account|Последнее обновление: 20.03.2018

|

1 Участник

Коллекция всех объектов слайда в указанную презентацию.

Замечания

Если решение Visual Studio содержит ссылку на Microsoft.Office.Interop.PowerPoint , эта коллекция сопоставляет для следующих типов:

  • Microsoft.Office.Interop.PowerPoint.Slides.GetEnumerator (для перечисления объектов слайда .)

В следующих примерах описывается как:

  • Создание слайда и добавить его в коллекцию
  • Возвращает одного слайда указать по имени, порядковый номер или номер идентификатор слайда
  • Вернуть подмножество слайдов в презентации
  • Применить ко всем слайдам в презентации в то же время свойство или метод

Пример

Используйте свойство слайдов для возврата коллекции Слайды .Используйте методAdd для создания нового слайда и добавить его в коллекцию.В следующем примере добавляется новый слайд в активную презентацию.

ActivePresentation.Slides.Add 2, ppLayoutBlank



Используйте Слайды (индекс), где индекс находится слайда имя или номер индекса, или Slides.FindBySlideID (индекс), где индекс — это идентификатор слайда для возврата объекта слайда .В следующем примере задается макет слайда один активной презентации.

ActivePresentation.Slides(1).Layout = ppLayoutTitle



В следующем примере задается макет слайда с именем «Большая диаграммы» активной презентации.Обратите внимание, что слайдов назначаются автоматически созданные имена формы Sliden (где n — целое число) время их создания.Чтобы назначить более понятным именем слайда, используйте свойство Name .

ActivePresentation.Slides("Big Chart").Layout = ppLayoutTitle



Используйте Slides.Range (индекс), где индекс — номер индекса слайда имя или массив номера индекса слайдов или массив имен слайда, возвращает объект SlideRange , который представляет собой подмножество коллекции Слайды .В следующем примере задается заливки фона для слайдов один и три активной презентации.

With ActivePresentation.Slides.Range(Array(1, 3))

.FollowMasterBackground = False

.Background.Fill.PresetGradient msoGradientHorizontal, _

1, msoGradientLateSunset

End With



Если вы хотите сделать что-нибудь ко всем слайдам в презентации в то же время (например, удалите все из них либо свойства для всех остальных), использовать Slides.Range без аргументов для построения SlideRange коллекция, содержащая всех слайдов Слайды семейства сайтов, а затем применять соответствующее свойство или метод в коллекцию SlideRange .В следующем примере задается заливки фона для всех слайдов в активной презентации

With ActivePresentation.Slides.Range

.FollowMasterBackground = False

.Background.Fill.PresetGradient msoGradientHorizontal, _

1, msoGradientLateSunset

End With



См. также

Понятия

Справочник по объектной модели PowerPoint

 
MyTetra Share v.0.52
Яндекс индекс цитирования