CustomXMLParts.Add Method (Office)
Allows you to add a new CustomXMLPart to a file.
Syntax
expression .Add(XML, SchemaCollection)
expression An expression that returns a CustomXMLParts object.
Parameters
Name |
Required/Optional |
Data Type |
Description |
|---|---|---|---|
XML |
Optional |
String |
Contains the XML to add to the newly created CustomXMLPart. |
SchemaCollection |
Optional |
CustomXMLSchemaCollection |
Represents the set of schemas to be used to validate this stream. |
Return Value
CustomXMLPart
Example
The following example adds a new CustomXMLPart, selects a CustomXMLPart using a search criteria, and then selects a single node from that part.
Sub ShowCustomXmlParts()
On Error GoTo Err
Dim cxp1 As CustomXMLPart
Dim cxn As CustomXMLNode
Dim cxns As CustomXMLNodes
Dim strXml As String
Dim strUri As String
' Example written for Word.
' Add a custom XML part.
ActiveDocument.CustomXMLParts.Add "<custXMLPart />"
' Returns the first custom XML part with the given root namespace.
Set cxp1 = ActiveDocument.CustomXMLParts("urn:invoice:namespace")
' Get a node using XPath.
Set cxn = cxp1.SelectSingleNode("//*[@quantity < 4]")
Exit Sub
' Exception handling. Show the message and resume.
Err:
MsgBox (Err.Description)
Resume Next
End Sub