xml download "argument not optional"

I am trying to convert some code from single sheet to multi-sheet so I can use in an existing excel workbook - up to 70 wk sheets

It is in Public Sub LoadRaceField(wks As Worksheet)


If accepts:- Set runnerList = xmldoc.SelectNodes("//Runner")

For I = 0 To (runnerList.Length - 1)


Set runner = runnerList.Item(I)

Set runnerNumber = runner.Attributes.getNamedItem("RunnerNo")



but then rejects:-


Set poolList = xmldoc.SelectNodes("//Pool")


For J = 0 To (poolList.Length - 1)


Set Pool = poolList.Item(J) GETS STOPPED HERE WHEN COMPILING


Set poolwin = Pool.Attributes.getNamedItem("PoolType")


Any help would be greatly appreciated.


Ta,


Martin

Got the solution Pool needed to be Poola or anything different than Pool as it is already being used

Ta,
Martin

Quote:

---

Originally Posted by Martinw

I am trying to convert some code from single sheet to multi-sheet so I can use in an existing excel workbook - up to 70 wk sheets

It is in Public Sub LoadRaceField(wks As Worksheet)


If accepts:- Set runnerList = xmldoc.SelectNodes("//Runner")

For I = 0 To (runnerList.Length - 1)


Set runner = runnerList.Item(I)

Set runnerNumber = runner.Attributes.getNamedItem("RunnerNo")



but then rejects:-


Set poolList = xmldoc.SelectNodes("//Pool")


For J = 0 To (poolList.Length - 1)


Set Pool = poolList.Item(J) GETS STOPPED HERE WHEN COMPILING


Set poolwin = Pool.Attributes.getNamedItem("PoolType")


Any help would be greatly appreciated.


Ta,


Martin

---

Different as in Runner to runner?