VBA 执行错误 462:远程服务器不可用

时间:2021-01-08 08:45:37

标签: excel

我正在尝试从 Excel 填写表格。代码打开请求的网站但没有写入值,还显示执行错误(462)

''' 子 pullDataFromWeb()

将 IE 调暗为对象

将文档变暗为 HTMLDocument

设置 IE = CreateObject("InternetExplorer.Application")

IE.Visible = True

IE.navigate "url" 在 IE.Busy 或 IE.readyState <> 4

时执行

Application.Wait DateAdd("s", 1, Now)

循环

IE.document.getElementsByName("title")(0).Value=5

结束子

'''

PS:当我在另一个网站上尝试相同的代码时,它运行得很好。

0 个答案:

没有答案