Compartir a través de

Objeto Slides (PowerPoint)

  • Artículo

Colección de todos los objetos Slide de la presentación especificada.

Comentarios

Si la solución de Visual Studio incluye la referencia de Microsoft.Office.Interop.PowerPoint, esta colección se asigna a los siguientes tipos:

  • Microsoft.Office.Interop.PowerPoint.Slides.GetEnumerator (para enumerar los objetos Slide).

En los siguientes ejemplos se describe cómo:

  • Crear una diapositiva y agregarla a la colección.

  • Devolver una diapositiva que se especifica por nombre, número de índice o número de identificación de diapositiva.

  • Devolver un subconjunto de las diapositivas de la presentación.

  • Aplicar una propiedad o un método a todas las diapositivas de la presentación al mismo tiempo.

Ejemplo

Use la propiedad Slides para devolver una colección Slides. Utilice el método Add para crear una nueva diapositiva y agregarla a la colección. En el siguiente ejemplo se agrega una nueva diapositiva a la presentación activa.

ActivePresentation.Slides.Add 2, ppLayoutBlank

Use Slides (index), donde index es el nombre de la diapositiva o el número de índice, o use Slides.FindBySlideID (index), donde index es el número de id. de diapositiva, para devolver un único objeto Slide . En el siguiente ejemplo se establece el diseño de la diapositiva uno en la presentación activa.

ActivePresentation.Slides(1).Layout = ppLayoutTitle

En el siguiente ejemplo se establece el diseño de la diapositiva denominada "Gráfico grande" en la presentación activa. Tenga en cuenta que a las diapositivas se les asigna un nombre generado automáticamente con la forma Diapositivan (donde n es un entero) cuando se crean. Para asignar un nombre más significativo a una diapositiva, utilice la propiedad Name.

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

Use Slides.Range (index), donde index es el número o el nombre del índice de la diapositiva o una matriz de números de índice de diapositivas o una matriz de nombres de diapositivas, para devolver un objeto SlideRange que representa un subconjunto de la colección Slides . En el siguiente ejemplo se establece el relleno de fondo de las diapositivas uno y tres de la presentación activa.

With ActivePresentation.Slides.Range(Array(1, 3)) 
    .FollowMasterBackground = False 
    .Background.Fill.PresetGradient msoGradientHorizontal, _ 
        1, msoGradientLateSunset 
End With

Si desea hacer algo a todas las diapositivas de la presentación al mismo tiempo (por ejemplo, eliminarlas todas o establecer una propiedad para todas ellas), use Slides.Range sin ningún argumento para crear una colección SlideRange que contenga todas las diapositivas de la colección Slides y, a continuación, aplique el método o la propiedad adecuados a la colección SlideRange. En el ejemplo siguiente, se establece el relleno de fondo de todas las diapositivas de la presentación activa.

With ActivePresentation.Slides.Range 
    .FollowMasterBackground = False 
    .Background.Fill.PresetGradient msoGradientHorizontal, _ 
        1, msoGradientLateSunset 
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.