На некоторых веб-страницах я не могу получить доступ к элементам HTML, используя VBA.Что я делаю неправильно?Например, у меня есть две разные страницы на одном веб-сайте.
Этот код возвращает количество совпадений на странице.
Sub Oddsportalmatches()
Dim IE As New SHDocVw.InternetExplorer
Dim HTMLDoc As New MSHTML.HTMLDocument
Dim Matches As MSHTML.IHTMLElementCollection
IE.Visible = True
IE.Navigate "https://www.oddsportal.com/matches/soccer/"
Do While IE.ReadyState <> READYSTATE_COMPLETE
Loop
Set HTMLDoc = IE.Document
Set Matches = HTMLDoc.getElementsByClassName("name table-participant")
Debug.Print Matches.Length
End Sub
Этот код возвращает 0. На самом деле я не могу получить доступ к любомуэлемент в таблице соответствий.
Sub Oddsportalmatches()
Dim IE As New SHDocVw.InternetExplorer
Dim HTMLDoc As New MSHTML.HTMLDocument
Dim Matches As MSHTML.IHTMLElementCollection
IE.Visible = True
IE.Navigate "https://www.oddsportal.com/predictions/"
Do While IE.ReadyState <> READYSTATE_COMPLETE
Loop
Set HTMLDoc = IE.Document
Set Matches = HTMLDoc.getElementsByClassName("table-participant")
Debug.Print Matches.Length
End Sub