使用VBA单击IE中的按钮

时间:2017-12-13 10:57:46

标签: vba internet-explorer buttonclick

我目前正在寻找一种方法来点击网页上的按钮来自动导出。

我已经成功登录网页并点击登录按钮重定向页面,但是我无法点击我要查找的下一个按钮。

我的代码:

For Each ele In IE.document.getElementsByTagName("ul")
 If ele.document.getElementsByTagName("a").getAttribute("aria-labelledby") = "Exporter vers CSV" Then ele.Click
Next

网站来源:

<ul class="dropdown-menu pull-left">
   <!-- ngRepeat: item in secondaryItems track by item.dataAid --><li ng-repeat="item in secondaryItems track by item.dataAid" class="">
     <a role="button" ng-show="item.visible" aria-labelledby="Exporter vers CSV" data-aid="tool-bar-inner-dd-btn-export" type="submit" ng-disabled="!item.enabled" ng-class="{plToolbarItemDisabled:!item.enabled, disabled:!item.enabled}" class="grid-export-item-btn" ng-click="item.callback(item, $event)" pl-toolbar-button-in-dropdown="" item="item">

2 个答案:

答案 0 :(得分:2)

我无法在不知道您的网址的情况下对其进行测试,但这可能会起作用:

For Each ele In IE.document.getElementsByTagName("ul")
    For Each ele2 In ele.getElementsByTagName("a")
        If InStr(ele2.InnerHtml, "aria-labelledby=""Exporter vers CSV""") Then ele2.Click
    Next ele2
Next ele

答案 1 :(得分:1)

放手一搏。当你处于instr()功能时,只需使用下面的方法即可到达那里。

For Each ele In IE.document.getElementsByTagName("a")
    If InStr(ele.getAttribute("aria-labelledby"), "Exporter vers CSV") > 0 Then ele.Click: Exit For
Next ele