Objeto NamedSlideShows (PowerPoint)

Uma coleção de todos os objetos NamedSlideShow da apresentação. Cada objeto NamedSlideShow representa uma apresentação de slides personalizada.

Exemplo

Use a propriedade NamedSlideShows para retornar a coleção NamedSlideShows. Use NamedSlideShows (index), em que index é o nome da apresentação de slides ou número de índice personalizado, para retornar um único objeto NamedSlideShow . O exemplo a seguir exclui a apresentação de slides personalizada denominada "Quick Show".

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

Use o método Add para criar uma nova apresentação de slides e adicioná-lo à coleção NamedSlideShows. O exemplo a seguir adiciona à apresentação ativa a apresentação de slides nomeada "Quick Show" que contém os slides 2, 7 e 9. O exemplo executa essa apresentação de slides personalizada.

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

Confira também

Referência de modelo de objeto do PowerPoint

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.