Dim XMLStr As String Dim domDoc As DOMDocument Set domDoc = New DOMDocument XMLStr = vCmp.GetBusinessObjectXmlSchema(oInvoices) domDoc.loadXML (XMLStr) domDoc.save ("C:\ XMLFiles \MyXML2.xml")