Type Info:
XMLDOMNode As IXMLDOMNode
Dim TU As TransUnit Dim XMLDOMNode As IXMLDOMNode Set TU = Application.ActiveTransUnit Set XMLDOMNode = TU.XMLDOMNode