VBA IE Automation：从元素中获取URL

Question

我正试图从＆＃34; pShowMore＆＃34;中的第二个元素中获取URL。类。

我有这个：

For Each wd In CreateObject("Shell.Application").Windows
    If InStr(wd.LocationName, "Institution") <> 0 Then
        Exit For
    End If
Next wd

Dim newURL As String

newURL = wd.document.getElementsByClassName("pShowMore").getElementsByTagName("a")(1).getAttribute("href")

我得到错误：438 - ＆＃34;对象不支持属性或方法＆＃34;用于检索（即wd.document .....）

如何获取href中的网址？ 另外，为什么它不支持属性或方法？

Answer 1

事实证明，我只是在打开的窗户中出现错误。

我用过

    On Error Resume Next

这解决了我遇到的具体问题。