Excel VBA无法点击网页上的button

我已经做了很多与Excel的Internet Explorer自动化，但这让我难住。

我有一个页面，带有代码的button： –

<a class="button button-bg multi-search-add">add</a> 

我需要点击这个button来input一个pincode数据到表单中，但我无法做到这一点

我试过了

 Dim objButtonAll As Object Dim objButton As Object Set objButtonAll = ie.document.getElementsByTagName("a") For Each objButton In objButtonAll If objButton.className = "button button-bg multi-search-add" Then objButton.Click End If Next 

我也试过了

 Dim objButtonAll As Object Dim objButton As Object Set objButtonAll = ie.document.getElementsByTagName("a") For Each objButton In objButtonAll If objButton.innerText = "add" Then objButton.Click End If Next 

并尝试

 Dim objButtonAll As Object Dim objButton As Object Dim objA As HTMLInputButtonElement Set objButtonAll = ie.document.getElementsByTagName("a") For Each objButton In objButtonAll If objButton.innerText = "add" Then objA=objButton 'I get an error here objA.Click End If Next 

前两个代码可以识别点，但objButton.click什么都不做。 第三个代码片段提供了一个错误，即“对象variables或块variables未设置”

顺便说一句，这是页面中的第130个“a”元素，第129个“a”元素的“订单状态”链接很容易点击。

网站的快照如下。

此外，似乎这部分的代码是在Javascript中实现的，因为我无法在源HTML文件中find这个button。

有任何想法吗？

PS。 Sendkeys在这里工作大约50％的时间。