1
Действительно оцените, может ли кто-нибудь помочь. Часть кода всегда выполняется в Run - время Ошибка enter image description here HTML, часть в картине enter image description herevba getElementById причина Ошибка во время выполнения '424'
Спасибо за внимание.
Sub HTML_Table_To_Excel()
Dim objIE As Object
Set objIE = CreateObject("InternetExplorer.application")
With objIE
.Visible = True
.navigate ("http://www.global-rates.com/interest-rates/libor/libor.aspx")
End With
While objIE.Busy
Wend
Dim HTMLDoc As Object
Set HTMLDoc = objIE.document
Dim EuroButton As Object
Set EuroButton = HTMLDoc.getElementById("btn_eur")
objIE.Quit
Set objIE = Nothing
......
End Sub
В какой строке это происходит? Если вы положите перерыв на эту строку и подождите несколько секунд, прежде чем продолжить выполнение, все равно это не сработает? –
@TimWilliams Set EuroButton = ..... Эта строка не срабатывает. И спасибо, Тим, если я поставил там точку останова и подожду какое-то время, подпрограмма не подведет. –
Я думаю, вам нужно расширить свою проверку «Хотя IE.Busy»: см. Http://stackoverflow.com/questions/19334880/ie-busy-not-working-well-vba –