如何解决VBA Internet Explorer自动化问题
我尝试制作一个VBA宏
- 激活打开的互联网页面
- 在字段中输入文字
- 单击按钮
- 点击结果中的链接
我的代码是第1部分的以下 ,并且有效
AppTitle = "Search Outbound Batches"
AppActivate AppTitle
Set oApp = CreateObject("Shell.Application")
For i = 0 To 25
strName = ""
On Error Resume Next
strName = oApp.Windows(i).document.Url
If InStr(strName,"http://...") Then
Set oIE = oApp.Windows(i)
Exit For
End If
Next
对于第2部分,我尝试执行此操作,但这没用:什么都没输入
Set imputtext = oIE.document.getElementsByName("SBatchNumber")
inputtext.Value = "3424"
网页上检查元素的结果:
对于第3部分,我尝试了此方法,但都不起作用
Set tags = ie.document.getElementsByTagName("button")
For Each tagx In tags
If tagx.innerText = "Go" Then
tagx.Click
Exit For
End If
Next
这是检查详细信息:
对于第4部分,但这都不起作用
Set Batch = oIE.document.All("N3:BatchNumber:0")
Batch.Click
我还向您发送了该网页的打印屏幕,以便您更好地了解:
您能帮我解决所有这些问题吗? 非常感谢, 奥利弗
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。