Objeto NamedSlideShows (PowerPoint)
Una colección de todos los objetos NamedSlideShow de la presentación. Cada objeto NamedSlideShow representa una presentación con diapositivas personalizada.
Ejemplo:
Utilice la propiedad NamedSlideShows para devolver la colección NamedSlideShows. Use NamedSlideShows (index), donde index es el nombre de la presentación con diapositivas personalizada o el número de índice, para devolver un único objeto NamedSlideShow . En el ejemplo siguiente se elimina la presentación con diapositivas personalizada denominada "Quick Show".
ActivePresentation.SlideShowSettings _
.NamedSlideShows("Quick Show").Delete
Utilice el método Add para crear una nueva presentación con diapositivas y agregarla a la colección NamedSlideShows. En el siguiente ejemplo se agrega a la presentación activa con diapositivas denominada "Quick Show", que contiene las diapositivas 2, 7 y 9. En el ejemplo, a continuación, se ejecuta esta presentación con diapositivas 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
Consulte también
Referencia del modelo de objetos de PowerPoint
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.