CustomXMLPart.AddNode-Methode (Office)
Fügt der XML-Struktur einen Knoten hinzu.
Syntax
Ausdruck. AddNode (Parent, Name, NamespaceURI, NextSibling, NodeType, NodeValue)
Ausdruck Ein Ausdruck, der ein CustomXMLPart-Objekt zurückgibt.
Parameter
Name | Erforderlich/Optional | Datentyp | Beschreibung |
---|---|---|---|
Parent | Erforderlich | CustomXMLNode | Stellt den Knoten dar, unter dem dieser Knoten hinzugefügt werden soll. Wenn ein Attribut hinzugefügt wird, gibt der Parameter das Element an, dem das Attribut hinzugefügt werden soll. |
Name | Optional | String | Stellt den Basisnamen des hinzuzufügenden Knotens dar. |
NamespaceURI | Optional | String | Stellt den Namespace des anzufügenden Elements dar. Dieser Parameter ist erforderlich, um Knoten vom Typ msoCustomXMLNodeElement oder msoCustomXMLNodeAttribute anzufügen. andernfalls wird sie ignoriert. |
NextSibling | Optional | CustomXMLNode | Stellt den Knoten der nächsten gleichgeordneten Knoten des neuen Knotens werden soll. Wenn nicht angegeben, wird der Knoten am Ende der übergeordneten Knoten untergeordnete Elemente hinzugefügt. Dieser Parameter ist für Ergänzungen der Typ MsoXMLNodeAttribute ignoriert. Wenn der Knoten nicht um ein untergeordnetes Element des übergeordneten Objekts ist, wird ein Fehler angezeigt. |
NodeType | Optional | MsoCustomXMLNodeType | Gibt den Typ des Knotens, angefügt werden soll. Wenn der Parameter nicht angegeben ist, wird angenommen, dass vom Typ MsoCustomXMLNodeElement sein. |
NodeValue | Optional | String | Wird zum Festlegen des Werts des angefügten Knotens für die Knoten verwendet, die Text zulassen. Lässt der Knoten keinen Text zu, wird der Parameter ignoriert. |
HinwBemerkungeneise
Wenn der AddNode -Vorgang in einer ungültigen Struktur führen würde, die Anfügung nicht ausgeführt, und eine Fehlermeldung wird angezeigt.
Beispiel
Im folgenden Beispiel wird einem CustomXMLPart -Objekt ein Knoten hinzugefügt.
Sub AddNodeCustomXmlParts()
Dim cxp1 As CustomXMLPart
Dim cxn As CustomXMLNode
With ActiveDocument
' Add and populate a custom xml part
Set cxp1 = .CustomXMLParts.Add("<invoice />")
' Set the parent node
Set cxn = cxp1.SelectSingleNode("/invoice")
' Add a node under the parent node
cxp1.AddNode cxn, "upccode", "urn:invoice:namespace"
End With
End Sub
Siehe auch
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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für