xml - 如何使用vba解析XML

Question

我在 VBA 工作，想解析一个字符串，例如

<PointN xsi:type='typens:PointN' 
xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' 
xmlns:xs='http://www.w3.org/2001/XMLSchema'>
    <X>24.365</X>
    <Y>78.63</Y>
</PointN>

并将 X 和 Y 值放入两个单独的整数变量中。

我在 XML 方面是个新手，因为我从事的领域是 VB6 和 VBA。

我该怎么做？

Answer 1

多谢指点。

我不知道这是否是解决问题的最佳方法，但我是这样实现的。 我在我的 VBA 中引用了 Microsoft XML v2.6 dll，然后下面的代码片段为我提供了所需的值

Dim objXML As MSXML2.DOMDocument

Set objXML = New MSXML2.DOMDocument

If Not objXML.loadXML(strXML) Then  'strXML is the string with XML'
    Err.Raise objXML.parseError.ErrorCode, , objXML.parseError.reason
End If
 
Dim point As IXMLDOMNode
Set point = objXML.firstChild

Debug.Print point.selectSingleNode("X").Text
Debug.Print point.selectSingleNode("Y").Text