Anmerkung
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Stellt die Geometrie einer Freihandform während des Aufbaus dar.
Beispiel
Verwenden Sie die BuildFreeform -Methode, um ein FreeformBuilder -Objekt zurückzugeben. Verwenden Sie die AddNodes-Methode, um der freefrom-Methode Knoten hinzuzufügen. Verwenden Sie dieConvertToShape -Methode, um die im FreeformBuilder -Objekt definierte Form erstellen und zu der Shapes -Auflistung hinzufügen. Im folgenden Beispiel wird in myDocument ein Freihandobjekt mit vier Abschnitten eingefügt.
Set myDocument = ActivePresentation.Slides(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, 40
.AddNodes msoSegmentLine, msoEditingAuto, 360, 200
.ConvertToShape
End With
Siehe auch
PowerPoint-Objektmodellreferenz
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.