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.
Löscht das aktuelle CustomXMLPart aus dem Datenspeicher (IXMLDataStore-Schnittstelle ).
Syntax
Ausdruck.Delete
Ausdruck Ein Ausdruck, der ein CustomXMLPart-Objekt zurückgibt.
Hinweise
Wenn Sie versuchen, die Komponente zu löschen, die die Kerneigenschaften enthält, wird der Vorgang nicht ausgeführt, und eine Fehlermeldung wird angezeigt.
Beispiel
Im folgenden Beispiel wird ein benutzerdefiniertes XML-Teil hinzugefügt, ein Knoten mit einem Kriterium ausgewählt und das Teil und der Knoten gelöscht.
Sub ShowCustomXmlParts()
On Error GoTo Err
Dim cxp1 As CustomXMLPart
Dim cxn As CustomXMLNode
With ActiveDocument
' Example written for Word.
' Add and then load from a file.
Set cxp1 = .CustomXMLParts.Add
cxp1.Load "c:\invoice.xml"
Set cxn = cxp1.SelectSingleNode("//*[@quantity < 4]")
' Insert a subtree before the single node selected previously.
cxn.InsertSubTreeBefore("<discounts><discount>0.10</discount></discounts>")
' Delete custom XML part.
cxp1.Delete
cxn.Delete
End With
Exit Sub
' Exception handling. Show the message and resume.
Err:
MsgBox (Err.Description)
Resume Next
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.