Propiedad ShapeRange.GroupItems (Excel)
Returns a GroupShapes object that represents the individual shapes in the specified group. Use el método Item del objeto GroupShapes para devolver una sola forma del grupo. Se aplica a los objetos ShapeRange que representan formas agrupadas. Solo lectura.
Sintaxis
expresión. GroupItems
Expresión Variable que representa un objeto ShapeRange .
Ejemplo:
En este ejemplo se agregan tres triángulos a myDocument, se agrupan, se establece un color para todo el grupo y, a continuación, se cambia el color solo para el segundo triángulo.
Set myDocument = Worksheets(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
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.