FreeformBuilder.AddNodes-Methode (PowerPoint)

Artikel
04/07/2023

Fügt einen neuen Abschnitt am Ende der Freihandform, der erstellt wird, und fügt die Knoten, die das Segment definieren. Verwenden Sie diese Methode so oft, wie Sie knoten zu der Freihandform hinzufügen möchten, die Sie erstellen. Wenn Sie alle Knoten hinzugefügt haben, verwenden Sie die ConvertToShape -Methode die Freihandform erstellen, die Sie soeben definiert haben. Verwenden Sie die Einfügen -Methode der ShapeNodes -Auflistung, um nach dem Erstellen einer Freihandform Knoten hinzuzufügen.

Syntax

Ausdruck. AddNodes(SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
SegmentType	Erforderlich	MsoSegmentType	Der Typ des hinzuzufügenden Segments.
EditingType	Erforderlich	MsoEditingType	Die Bearbeitungseigenschaft des Scheitelpunkts. Wenn SegmentType MsoSegmentLine lautet, muss EditingType MsoEditingAuto sein.
X1	Erforderlich	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, gibt dieses Argument den horizontalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments an den Endpunkt des neuen Abschnitts. Wenn die Bearbeitungsart des neuen Knotens MsoEditingCorner entspricht, gibt dieses Argument den horizontalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments bis zum ersten Kontrollpunkt für das neue Segment an.
Y1	Erforderlich	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, gibt dieses Argument den vertikalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments an den Endpunkt des neuen Abschnitts an. Wenn die Bearbeitungsart des neuen Knotens MsoEditingCorner entspricht, gibt dieses Argument den vertikalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments bis zum ersten Kontrollpunkt für das neue Segment an.
X2	Optional	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingCorner entspricht, gibt dieses Argument den horizontalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments bis zum zweiten Kontrollpunkt für das neue Segment an. Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, geben Sie keinen Wert für dieses Argument an.
Y2	Optional	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingCorner entspricht, gibt dieses Argument den vertikalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments bis zum zweiten Kontrollpunkt für das neue Segment an. Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, geben Sie keinen Wert für dieses Argument an.
X3	Optional	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingCorner entspricht, gibt dieses Argument den horizontalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments an den Endpunkt des neuen Abschnitts. Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, geben Sie keinen Wert für dieses Argument an.
Y3	Optional	Single	Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingCorner entspricht, gibt dieses Argument den vertikalen Abstand (in Punkt) von der oberen linken Ecke des Dokuments an den Endpunkt des neuen Abschnitts. Wenn die Bearbeitungsart des neuen Abschnitts MsoEditingAuto entspricht, geben Sie keinen Wert für dieses Argument an.

Beispiel

In diesem Beispiel wird der ersten Folie der aktiven Präsentation eine Freihandform mit fünf Scheitelpunkten hinzugefügt.

Set myDocument = ActivePresentation.Slides(1) 
With myDocument.Shapes.BuildFreeform(msoEditingCorner, 360, 200) 
    .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingCorner, _ 
        X1:=380, Y1:=230, X2:=400, Y2:=250, X3:=450, Y3:=300 
    .AddNodes SegmentType:=msoSegmentCurve, EditingType:=msoEditingAuto, _ 
        X1:=480, Y1:=200 
    .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _ 
        X1:=480, Y1:=400 
    .AddNodes SegmentType:=msoSegmentLine, EditingType:=msoEditingAuto, _ 
        X1:=360, Y1:=200 
    .ConvertToShape 
End With

Siehe auch

FreeformBuilder-Objekt

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.

Freigeben über