VBA

Question

在网上，我看到很多人完成以下代码来自动化 VBA/IE 搜索功能交互：

objIE.document.getElementById("id_here").Value = "Search This Text"

我在运行时收到错误 "Object Required"。 ObjIE.Document.

我已经为此研究了几个小时，非常感谢任何帮助。这是我的完整代码。我会及时提供解决此问题所需的任何其他信息。

Sub InternetAutomation()

'Declaring and Setting Internet Explorer with Early Binding
Dim aExplorer As InternetExplorer
Set aExplorer = New InternetExplorer

'Set basic attributes of Internet Explorer and navigate to first webpage
With aExplorer
    .Visible = True
    .Navigate "www.google.com"
End With

'Wait while Internet Explorer is busy
Do While aExplorer.Busy
    Application.Wait DateAdd("s", 1, Now)
Loop

'Search Parameters
aExplorer.Document.getElementById("1st - ib").Value = "Search This Text"

End Sub

Answer 1

Tim Williams 提醒我 "getElementbyID" 后列出的错误 ID。显然，列出不正确的元素会导致 VBA 抛出 "Object Required" 错误。

将元素更正为正确的名称后，问题就解决了。

谢谢蒂姆！

关于 .value 为何不显示智能感知的任何想法？

VBA - 互联网自动化 - GetElementById.Value 缺失

VBA - Internet Automation - GetElementById.Value Missing

internet-explorer

automation

getelementbyid