Share via


CustomXMLPart.Delete Method

Office Developer Reference

Deletes the current CustomXMLPart from the data store (IXMLDataStore interface).

Aa433520.vs_note(en-us,office.12).gif  Note
References to DTDs from custom XML parts are not supported. DTD references in custom XML parts will not resolve, and custom XML parts containing DTD references generate an exception when an attempt is made to save the file's content to a flat XML file.

Syntax

expression.Delete

expression   An expression that returns a CustomXMLPart object.

Remarks

If you attempt to delete the part containing the core properties, the operation is not performed and an error message is displayed.

Example
The following example adds a custom XML part, select a node with a criteria, and delete the part and node.

Visual Basic for Applications
  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

See Also