Shapes.Range (Word)

Renvoie un objet ShapeRange qui représente les formes d’une plage.

Un objet Shape s'affiche toujours sur la même page que la plage à que laquelle il est ancré.

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