Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Genera un objeto de forma libre.
Sintaxis
expresión.
BuildFreeform( _EditingType_ , _X1_ , _Y1_ )
expresión necesaria. Variable que representa un objeto Shapes .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| EditingType | Obligatorio | MsoEditingType | Propiedad de edición del primer nodo. |
| X1 | Obligatorio | Single | La posición (en puntos) del primer nodo del dibujo con forma libre con relación al borde izquierdo del documento. |
| Y1 | Obligatorio | Single | La posición (en puntos) del primer nodo del dibujo con forma libre con relación al borde superior del documento. |
Valor devuelto
Observaciones
Utilice el método AddNodes para agregar segmentos a la forma libre. Después de haber agregado al menos un segmento a la forma libre, puede utilizar el método ConvertToShape para convertir el objeto FreeformBuilder en un objeto Shape que tenga la descripción geométrica que ha definido en el objeto FreeformBuilder.
Ejemplo
En este ejemplo se agrega una forma libre con cinco vértices al documento activo.
Dim docActive As Document
Set docActive = ActiveDocument
With docActive.Shapes.BuildFreeform(msoEditingCorner, 360, 200)
.AddNodes msoSegmentCurve, msoEditingCorner, _
380, 230, 400, 250, 450, 300
.AddNodes msoSegmentCurve, msoEditingAuto, 480, 200
.AddNodes msoSegmentLine, msoEditingAuto, 480, 400
.AddNodes msoSegmentLine, msoEditingAuto, 360, 200
.ConvertToShape
End With
Vea también
Objeto de la colección de formas
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.