Shapes.BuildFreeform-Methode (Excel)
Erstellt ein Freihandform-Objekt. Gibt ein FreeformBuilder -Objekt zurück, das die Freihandform so darstellt, wie sie erstellt wird.
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.
Ausdruck. BuildFreeform (EditingType, X1, Y1)
expression Eine Variable, die ein Shapes-Objekt darstellt.
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
EditingType | Erforderlich | MsoEditingType | Die Bearbeitungseigenschaft des ersten Knotens. |
X1 | Erforderlich | Single | Die Position (in Punkt) des ersten Knotens in der Freihandformzeichnung relativ zur linken oberen Ecke des Dokuments. |
Y1 | Erforderlich | Single | Die Position (in Punkt) des ersten Knotens der Freihandzeichnung, relativ zur oberen linken Ecke des Dokuments. |
FreeformBuilder
In diesem Beispiel wird myDocument ein Freihandobjekt mit fünf Scheitelpunkten hinzugefügt.
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
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.