Shape.Nodes (Word)
Renvoie une collection ShapeNodes qui représente la description géométrique de la forme spécifiée.
With ActiveDocument.Shapes(3).Nodes
.Insert Index:=4, SegmentType:=msoSegmentCurve, _
EditingType:=msoEditingSmooth, X1:=210, Y1:=100
End With