vba编程代码以单击网页中的Span

时间:2018-12-12 12:10:22

标签: html vba internet-explorer

HTML:

<tr id="m48482eee_tbod_tdrow-tr[R:16]"     class="tablerow   trodd" style="display:;" >
<td role="presentation" headers='m48482eeeerrtitle[R:-1]' aria-labelledby='m48482eeeerrtitle[R:-1]' class='tc' style='border-right:0px; width: 1px;'><img id='m48482eee_tbod_tdrow-tr[R:16]_er_img' src='blank.gif' style='display:none' class='tablerow_blank_icon' title="" alt=""/></td> <td id="m48482eee_tdrow_[C:0]-c[R:16]" tablecell="1"     class="tc cd" headers="m48482eee_ttrow_[C:0]-c"  >
<span id="m48482eee_tdrow_[C:0]_ttxt-lb[R:16]" align='left' ctype="label"    tabindex="0"      targetid="m48482eee_tdrow_[C:0]_ttxt-lb[R:16]"  mxevent="click"  class="text label   anchor" style="padding:0px;padding-left:1px;padding-top:5px;padding-bottom:5px;cursor:pointer;">INVTROPPR - Transfer Opportunities for Items Under Max</span>

    </td>

这是我的代码

For Each obj In ie.Document.forms(0).getElementsByTagName("span")
    If obj.innerText = "INVTROPPR - Transfer Opportunities for Items Under 
    Max" Then
       obj.parentElement.Click
       Exit For
    End If
Next

我想单击上面HTML中的Span。我尝试运行上面的代码,但这不起作用,问题出在哪里?

1 个答案:

答案 0 :(得分:1)

您尝试过

ie.document.querySelector("[tabindex='0']").click

ie.document.querySelector("[tabindex='0']").FireEvent "onclick"

这些元素通过其属性tabindex及其值来定位元素。