CanvasShapes.BuildFreeform-Methode (Word)

Erstellt ein Freihandform-Objekt. Gibt ein FreeformBuilder -Objekt zurück, das die Freihandform so darstellt, wie sie erstellt wird. .

Syntax

Ausdruck. BuildFreeform( _EditingType_ , _X1_ , _Y1_ )

expression Erforderlich. Eine Variable, die ein CanvasShapes-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
EditingType	Erforderlich	MsoEditingType	Der EditingType-Parameter kann msoEditingAuto oder msoEditingCorner sein; er kann nicht msoEditingSmooth oder msoEditingSymmetric sein.
X1	Erforderlich	Single	Die in Punkt gemessene Position des ersten Knotens in der Freihandform-Zeichnung relativ zum linken Rand des Dokuments.
Y1	Erforderlich	Single	Die in Punkt gemessene Position des ersten Knotens in der Freihandform-Zeichnung relativ zum oberen Rand des Dokuments.

Hinweise

Verwenden Sie die AddNodes -Methode, um das Freihandobjekt Segmente hinzuzufügen. Nachdem Sie der Freihandform mindestens ein Segment hinzugefügt haben, können Sie die ConvertToShape-Methode verwenden, um das FreeformBuilder-Objekt in ein Shape-Objekt mit der geometrischen Beschreibung zu konvertieren, die Sie im FreeformBuilder-Objekt definiert haben.

Beispiel

In diesem Beispiel wird dem aktiven Dokument eine Freihandform mit fünf Scheitelpunkten hinzugefügt.

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

Siehe auch

CanvasShapes-Auflistungsobjekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.