Question

几个小时前我的代码工作得非常好。但是当我现在打开文档并运行它时，我收到错误：

运行时错误'424'：需要对象

这是我的代码：

 Dim ieApp As New SHDocVw.InternetExplorer
 ieApp.Visible = True
 ieApp.Navigate = "<url here; sorry, its confidential>"

 Do While ieApp.Busy And Not ieApp.ReadyState = READYSTATE_COMPLETE
     DoEvents
 Loop

 Dim ieElement As Object
 Set ieElement = ieApp.Document.getElementById("i_specialist")
 ieElement.Value = "TestValue"

错误指向：

设置ieElement = ieApp.Document.getElementById（“i_specialist”）

我真的不知道出了什么问题。我在想两个可能的原因： - 对象类型错误 - 加载代码无法找到字段的页面出了问题

任何帮助表示赞赏！谢谢！

Answer 1

您是否在html文档页面中检查过具有id i_specialist的html元素？无论如何，当我正在使用htmlElements我这样做..值得尝试一下......

Set ie = CreateObject("InternetExplorer.Application")
    With ie
        .Visible = True
        .Navigate "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"

        Do Until .ReadyState = 4
            DoEvents
        Loop

        .document.all.Item("i_specialist").Value = "TestValue"


    End With

VBA上的对象必需错误（使用VBA提交IE表单）

1 个答案: