Freigeben über


CustomXMLPart.Delete-Methode (Office)

Löscht das aktuelle CustomXMLPart aus dem Datenspeicher (IXMLDataStore-Schnittstelle ).

Syntax

Ausdruck. Löschen

Ausdruck Ein Ausdruck, der ein CustomXMLPart-Objekt zurückgibt.

HinwBemerkungeneise

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.