VBA - Code Error 91

[jamescooper]

I am getting error code 91 on the line

ActiveWorkbook.Sheets("Sheet1").Range("A1").Value = holdingsClass(0).textContent

Any reason please? Thanks.

Sub Pull_Data()


Dim IE As InternetExplorer
Dim html As HTMLDocument


Set IE = New InternetExplorer
IE.Visible = False
IE.navigate "http://greyhoundbet.racingpost.com/#meeting-list/view=time&r_date=2018-02-16"


'Wait until IE is done loading page
Do While IE.readyState <> READYSTATE_COMPLETE
DoEvents
Loop


'Get Data
Set html = IE.document
Set holdingsClass = html.getElementsByClassName("appList raceList raceListTime")
ActiveWorkbook.Sheets("Sheet1").Range("A1").Value = holdingsClass(0).textContent


'Quit and clean
IE.Quit
Set IE = Nothing


End Sub

 

[Leith Ross]

Hello James,

I think you misunderstood what this HTML function does...

Set holdingsClass = html.getElementsByClassName("appList raceList raceListTime")

This function does not take an array of arguments, rather it returns an array of all HTML elements that have a single Class name.

Set holdingsClass = html.getElementsByClassName("appList")

 

[jamescooper]

Hello James,

I think you misunderstood what this HTML function does...

Set holdingsClass = html.getElementsByClassName("appList raceList raceListTime")

This function does not take an array of arguments, rather it returns an array of all HTML elements that have a single Class name.

Set holdingsClass = html.getElementsByClassName("appList")

Thanks, I am really a newbie at pulling data via HTML, is there any literature on this please?

 

[Leith Ross]

Hello James,

There is an excellent site I have used a lot and have bookmarked W3Schools They have examples, references, and tutorials available for HTML, CSS, JavaScript, SQL, and some other languages.

 

[jamescooper]

thanks, this doesnt appear to tell you how to vba pull html from the web though?

 

[Leith Ross]

HEllo James,

Sorry, you did ask about pulling HTML data using VBA. I personally don't know of any sites that provide tutorials how to do this using VBA. Others here might know and post some links for you.