Objet GroupShapes (Excel)
Cet objet représente les formes individuelles d'une forme groupée.
Chaque forme est représentée par une forme objet. À l'aide de l' élément méthode avec cet objet, vous pouvez travailler avec des formes individuelles dans un groupe sans avoir à les dissocier.
Utilisez la propriété GroupItems de l’objet Shape pour renvoyer la collection GroupShapes .
Utilisez GroupItems (index), où index est le nombre de formes individuelles dans la forme groupée, pour renvoyer une forme unique de la collection GroupShapes .
L'exemple suivant montre comment ajouter trois triangles à myDocument, les grouper, définir une couleur pour l'ensemble du groupe, puis changer la couleur du deuxième triangle.
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
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.