想要通過Excel VBA在IE中單擊超鏈接（<a>標籤）

Question

想要通過Excel VBA單擊IE中的超鏈接（標籤）'abc'。試圖getElementbyTag/getElementsbyName/getElementsByClassName方法，但沒有工作

<a href = 'xyz'> abc </a> 


    Dim objIE As InternetExplorer 
    set objIE = New InternetExplorer 
    objIE.Visible = True 
    objIE.Document.getElementsByTagName("xyz").Click 

Answer 1

getElementsByTagName返回的鏈接的集合，讓你在需要循環，找到你想要的。 。

Dim l 

For Each l in objIE.Document.getElementsByTagName("a") 
    If l.innerText = "abc" Then 
     l.Click 
     Exit For 
    End If 
Next l