CustomXMLNode.ReplaceChildNode method (Office)

Removes the specified child node (and its subtree) from the main tree, and replaces it with a different node in the same location.

Syntax

expression.ReplaceChildNode(OldNode, Name, NamespaceURI, NodeType, NodeValue)

expression An expression that returns a CustomXMLNode object.

Parameters

Name	Required/Optional	Data type	Description
OldNode	Required	CustomXMLNode	Represents the child node to be replaced.
Name	Optional	String	Represents the base name of the element to be added.
NamespaceURI	Optional	String	Represents the namespace of the element to be added. This parameter is required if adding nodes of type msoCustomXMLNodeElement or msoCustomXMLNodeAttribute; otherwise, it is ignored.
NodeType	Optional	MsoCustomXMLNodeType	Specifies the type of node to add. If the parameter is not specified, it is assumed to be of type msoCustomXMLNodeElement.
NodeValue	Optional	String	Used to set the value of the node to be added for those nodes that allow text. If the node doesn't allow text, the parameter is ignored.

Remarks

If the OldNode parameter is not a child of the context node, or if the operation would result in an invalid tree structure, the replacement is not performed and an error message is displayed. In addition, in a case where the node to be added already exists, the replacement is not performed and an error message is displayed.

Example

The following example selects a custom part and then a node in that part. The code then replaces a child of that node with another node.

Dim cxp1 As CustomXMLPart 
Dim cxn As CustomXMLNode 
 
With ActiveDocument 
 
   ' Return the first custom xml part with the given root namespace. 
   Set cxp1 = .CustomXMLParts("urn:invoice:namespace")     '  
                              
   Set cxn = cxp1.SelectSingleNode("//*[@supplierID = 1]")  
 
   ' Replace a child node. 
    cxn.ReplaceChildNode(cxn.SelectSingleNode("//discount", "rebate")   
        
End With

Feedback

Was this page helpful?

Last updated on 2021-09-13