Objeto GroupShapes (PowerPoint)
Representa las formas individuales de una forma agrupada. Cada forma está representada por un objeto Shape. Utilizando el elemento método con este objeto, puede trabajar con formas individuales de un grupo sin tener que desagruparlas.
Ejemplo:
Utilice la propiedad GroupItems para devolver la colección GroupShapes . Use GroupItems (index), donde index es el número de la forma individual dentro de la forma agrupada, para devolver una sola forma de la colección GroupShapes . En el siguiente ejemplo se agregan tres triángulos a myDocument, se agrupan, se establece un color para todo el grupo y, a continuación, se cambia únicamente el color del segundo triángulo.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes
.AddShape(msoShapeIsoscelesTriangle, 10, _
10, 100, 100).Name = "shpOne"
.AddShape(msoShapeIsoscelesTriangle, 150, _
10, 100, 100).Name = "shpTwo"
.AddShape(msoShapeIsoscelesTriangle, 300, _
10, 100, 100).Name = "shpThree"
With .Range(Array("shpOne", "shpTwo", "shpThree")).Group
.Fill.PresetTextured msoTextureBlueTissuePaper
.GroupItems(2).Fill.PresetTextured msoTextureGreenMarble
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.