ShapeNodes.Insert-Methode (PowerPoint)
Fügt nach dem angegebenen Knoten der Freihandform ein neues Segment ein.
Syntax
Ausdruck. Einfügen (Index, SegmentType, EditingType, X1, Y1, X2, Y2, X3, Y3)
Ausdruck Eine Variable, die ein ShapeNodes-Objekt darstellt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Index | Erforderlich | Long | Der Knoten, nach dem der neue Knoten eingefügt werden soll. |
SegmentType | Erforderlich | MsoSegmentType | Der Typ des hinzuzufügenden Segments. |
EditingType | Erforderlich | MsoEditingType | Die Bearbeitungseigenschaft des Scheitelpunkts. |
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. |
HinwBemerkungeneise
Der Wert des SegmentType-Parameters kann eine der folgenden MsoSegmentType-Konstanten sein.
msoSegmentCurve |
msoSegmentLine |
Der EditingType-Parameterwert kann eine der folgenden MsoEditingType-Konstanten sein.
msoEditingAuto |
msoEditingCorner |
Beispiel
In diesem Beispiel wird ein Übergangsknoten mit einem gekrümmten Segment nach dem vierten Knoten der dritten Form in myDocument hinzugefügt. Die dritte Form muss eine Freihandform mit mindestens vier Knoten sein.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3).Nodes
.Insert Index:=4, SegmentType:=msoSegmentCurve, _
EditingType:=msoEditingSmooth, X1:=210, Y1:=100
End With
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.