Shapes.BuildFreeform (Word)
Genera un objeto de forma libre.
Utilice el método AddNodes para agregar segmentos a la forma libre.
BuildFreeform (EditingType, X1, Y1)
Dim docActive As Document
Set docActive = ActiveDocument
Arguments
Estos son los argumentos con nombre :
EditingType (Office.MsoEditingType) - Propiedad de edición del primer nodo.
X1 - Single
Y1 - Single