VBA loop through XML nodes

Question

Hello I am trying to loop between nodes from an xml but for some reason I am only getting the first node any ideas would be greatly appreciated! XML:

<root>
          <AC>
           <answer id ="c1"> 
              blue
           </answer>
           <answer id ="c1"> 
              blue
           </answer>
</root>

VBA Code:

     Set ques = getQues(qName) 'ques is in CreateObject("MSXML2.DOMDocument") format

            Set nodes = ques.SelectNodes("/root/AC")
            For Each node In nodes
                MsgBox (node.SelectSingleNode("answer").Text)
                Cells(i + 1, j).Value = node.SelectSingleNode("answer").Text
            Next node

Thank you for your help!

Your XML is not well-formed - missing the closing </AC>

Tim Williams
– Tim Williams

2015-04-20 23:16:11 +00:00
Commented Apr 20, 2015 at 23:16 — Tim Williams
– Tim Williams, Commented Apr 20, 2015 at 23:16

Tim Williams · Accepted Answer · 2015-04-20 23:21:43Z

3

Your selectnodes is only selecting the AC node: it looks like you really want to select the collection of answer nodes -

Sub Tester()

Dim d As New MSXML2.DOMDocument
Dim nodes, nd

    d.LoadXML Range("A1").Value

    Set nodes = d.SelectNodes("/root/AC/answer")
    For Each nd In nodes
        Debug.Print nd.getAttribute("id"), nd.Text
    Next nd

End Sub

answered Apr 20, 2015 at 23:21

Tim Williams

169k8 gold badges104 silver badges143 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

VBA loop through XML nodes

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related