Question

我正在尝试编写一些代码来查找excel单元格中的单词，搜索该单词，最重要的是，点击返回的链接。

我有搜索部分，但是点击我正在努力的链接。 HMTL提取物是 -

for(i=2; i<n; i=i*2)

我没有输入href和rel文本，但我只想点击返回的链接并按照该网站进行操作。有什么帮助吗？

这是我的代码 -

<span>
<div class="searchResult webResult ">
<div class="resultTitlePane">
<h3>
<a class="outbound" href="whatever" target ="" rel="nofollow" rev="lots of 
text">..</a>
</h3>
</div>

Answer 1

在您的代码中，您可以将占位符替换为''NEED TO ADD SOMETHING HERE TO CLICK LINK''：

iedoc.getElementsByClassName("resultTitlePane")(0).getElementsByTagName("a")(0).Click

回应即将完成的OP's comment：

您可以继续使用readystate循环，然后循环实际对象直到它可用，然后单击它：

Do Until ie.ReadyState = READYSTATE_COMPLETE
Loop

ie.Visible = True        
Set iedoc = ie.document

' ^ ^ ^ ^ Already part of your code

Dim myBtn As Object
Set myBtn = Nothing

' Loop object while it's Nothing
On Error Resume Next
Do While myBtn Is Nothing
    DoEvents
    set myBtn = iedoc.getElementsByClassName("resultTitlePane")(0).getElementsByTagName("a")(0)
Loop
On Error GoTo 0

myBtn.Click

如何使用excel VBA单击IE中的链接

1 个答案: