我在 VBA 中有一个宏,它使用 Excel 自动导航到网页。我可以通过它们的 ID 选择元素,然后单击或插入值来自动化站点。然而,当我试图“点击”一个似乎没有任何 ID 的链接/按钮时,我被卡住了。这是一个 JavaScript 链接:<div><table class="table" id="ctl00_cphMaster_Results" style="width: 100%; border-collapse: collapse;" cellspacing="0"> <tbody><tr> <th style="width: 70px; white-space: nowrap;" scope="col"><a href="javascript:__doPostBack('ctl00$cphMaster$Results','Sort$Indicator')">True?</a></th><th class="hidden" style="width: 100px;" scope="col"><a href="javascript:__doPostBack('ctl00$cphMaster$Results','Sort$Reference')">Reference</a></th><th scope="col"><a href="javascript:__doPostBack('ctl00$cphMaster$Results','Sort$Results')">Result Number</a></th><th class="hidden" scope="col"> </th><th scope="col"><a href="javascript:__doPostBack('ctl00$cphMaster$Results','Sort$Type')">Type</a></th><th class="hidden" scope="col"></th><th class="hidden" scope="col"> </th><th class="hidden" scope="col"> </th> </tr><tr> <td align="center"><a href="Summary02.aspx?"><img title="Accepted" id="true" style="border: currentColor; border-image: none;" alt="Accepted" src="/Common/Graphics/tick_green.gif"></a><img id="Accepted" style="border: currentColor; border-image: none;" src="/Common/Graphics/tick_spacer.gif"><img id="Accepted" style="border: currentColor; border-image: none;" src="/Common/Graphics/tick_spacer.gif"></td><td class="hidden">MyValue</td><td><a href="javascript:__doPostBack('ctl00$cphMaster$Results','ResultNumber$0')">ResultNumber</a></td> </tr></tbody></table>我曾尝试单击“ResultNumber$0”或以某种方式触发它,但到目前为止还没有成功。如何让 IE 自动点击这个 javascript 链接/按钮?到目前为止我的代码:Sub ClickJavaLink()Const URL = "https://myurl" Dim ie As ObjectSet ie = CreateObject("InternetExplorer.Application")With ie .navigate URL ieBusy ie .Visible = True结束子Sub ieBusy(ie As Object) Do While ie.Busy 或 ie.ReadyState < 4 DoEvents Loop End Sub
添加回答
举报
0/150
提交
取消