Oharra
Baimena behar duzu orria atzitzeko. Direktorioetan saioa has dezakezu edo haiek alda ditzakezu.
Baimena behar duzu orria atzitzeko. Direktorioak alda ditzakezu.
Representa la geometría de una forma libre mientras se está compilando.
Observaciones
Use el método BuildFreeform del objeto Shapes para devolver un objeto FreeformBuilder . Utilice el método AddNodes para agregar nodos a la forma libre. Use el método ConvertToShape para crear la forma definida en el objeto FreeformBuilder y agregarla a la colección Shapes .
Ejemplo
En el siguiente ejemplo se agrega una forma libre con cuatro segmentos a myDocument.
Set myDocument = Worksheets(1)
With myDocument.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
Métodos
Propiedades
Vea también
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.