2017-02-13 204 views
1

真的很感謝任何人都可以提供幫助。 代碼的部分總是碰上運行 - 時間錯誤 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 
+0

哪條線路故障?如果你在這條線上休息並等待幾秒鐘再繼續執行,它是否仍然失敗? –

+0

@TimWilliams設置EuroButton = .....此行失敗。謝謝,蒂姆,如果我在那裏設置一箇中斷點,並等待一段時間,那麼這個小組不會失敗。 –

+0

我想你需要擴展你的'雖然IE.Busy'檢查:請參閱 - http://stackoverflow.com/questions/19334880/ie-busy-not-working-well-vba –

回答

0

它不是一個元素ID--它是一個標籤名稱; Set EuroButton = HTMLDoc.getElementsByTagName("btn_eur")然後當您需要訂購它時:EuroButton(0).[command here]

相關問題