使用VBA

时间:2017-03-24 14:19:59

标签: html excel vba excel-vba internet-explorer

我想使用VBA点击IE中的按钮(可能实际上不是按钮)。问题是我想点击的“按钮”源中没有ID或名称。

以下是网页来源的一部分(见链接):

Part of source (NEW)

我想点击其中包含文字的部分:“Informatie”。我目前在VBA中使用以下代码(只是其中的一部分)。但是,当我执行代码时,没有任何反应,甚至没有错误消息:

 Dim e
 Set e = HTMLDoc.getElementsByClassName("BackgroundApp")(0).getElementsByTagName("Div")(7).getElementsByTagName("td")(0)
 e.Click

1 个答案:

答案 0 :(得分:0)

没有实际页面很难提供帮助,所以我复制它,这里是经过测试的代码:

Dim IE as Object
Dim objCollection  As Object
Dim tdNode  As Object

Set objCollection = IE.document.getElementsByTagName("td")

For Each tdNode In objCollection
    If InStr(1, tdNode.innerHTML, "Informatie", vbTextCompare) > 0 Then
        ' "Informatie" button is found
        tdNode.Click    ' click it
        Exit For
    End If
Next tdNode  

试试并报告。