简单: Dim objXML as Microsoft.XMLDOM '如果安装MSXML3.0改为Msxml2.DOMDocument set objXML = CreateObject("Microsoft.XMLDOM") objXML.async = false objXML.loadXML(XML串) '如果是XML文件使用objXML.load(xml文件) set objNode= objXML.selectSingleNode("//aa") '可能和你具体的XML文件有关 objNode.text="444"
<aa>123</aa>
将其中aa元素的值改成444
Dim objXML as Microsoft.XMLDOM '如果安装MSXML3.0改为Msxml2.DOMDocument
set objXML = CreateObject("Microsoft.XMLDOM")
objXML.async = false
objXML.loadXML(XML串) '如果是XML文件使用objXML.load(xml文件)
set objNode= objXML.selectSingleNode("//aa") '可能和你具体的XML文件有关
objNode.text="444"
我也在找答案