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


Объект NamedSlideShows (PowerPoint)

Коллекция всех объектов NamedSlideShow в презентации. Каждый объект NamedSlideShow представляет пользовательское слайд-шоу.

Пример

Используйте свойство NamedSlideShows, чтобы вернуть коллекцию NamedSlideShows . Используйте NamedSlideShows (index), где index — это пользовательское имя слайд-шоу или номер индекса, чтобы вернуть один объект NamedSlideShow . В следующем примере удаляется пользовательское слайд-шоу с именем "Быстрое шоу".

ActivePresentation.SlideShowSettings _
    .NamedSlideShows("Quick Show").Delete

Используйте метод Add, чтобы создать слайд-шоу и добавить его в коллекцию NamedSlideShows . В следующем примере к активной презентации добавляется именованное слайд-шоу "Быстрое шоу", содержащее слайды 2, 7 и 9. Затем в примере запускается пользовательское слайд-шоу.

Dim qSlides(1 To 3) As Long

With ActivePresentation

    With .Slides

        qSlides(1) = .Item(2).SlideID

        qSlides(2) = .Item(7).SlideID

        qSlides(3) = .Item(9).SlideID

    End With

    With .SlideShowSettings

        .NamedSlideShows.Add "Quick Show", qSlides

        .RangeType = ppShowNamedSlideShow

        .SlideShowName = "Quick Show"

        .Run

    End With

End With

См. также

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.