Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
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
Vea 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.