Classe GroupShapes - formes individuelles d'une forme groupée (Word VBA)

La classe GroupShapes représente les formes individuelles d'une forme groupée. Pour utiliser une variable de classe GroupShapes, elle doit d'abord être instanciée, par exemple

Count

Renvoie un type long qui représente le nombre de formes dans la collection.


Dim gss As GroupShapes: Set gss =  
Dim lngCount As Long
lngCount = gss.Count

Item

Renvoie un objet Shape spécifique appartenant à une collection.

Item (Index)

Index: Objet spécifique qui doit être renvoyé.


Dim gss As GroupShapes: Set gss =  
Dim shpGroupShape As Shape
Set shpGroupShape = gss(Index:=1)

Range

Renvoie un objet ShapeRange .

Objets ShapeRange ne comprennent pas les objets InlineShape. La plupart des opérations que vous pouvez effectuer avec un objet Shape peuvent également être effectuées avec un objet ShapeRange qui contient une seule forme.

Range (Index)

Index: Spécifie quelles sont les formes à inclure dans la plage spécifiée.


Sub ShRange() 
 With ActiveDocument.Shapes.Range(1).Fill 
 .ForeColor.RGB = RGB(255, 0, 255) 
 .Visible = msoTrue 
 End With 
End Sub