Tag: 未指定

VBA – Excel – 自动化错误未指定错误

所以我遇到了一个轻微的绊脚石，希望在这里有人可以帮助我。 总之，我需要访问一串网页（每个网页上的名称列表已经input，该代码工作正常）。 当我的代码访问每个页面时，我需要撤回信息。 不幸的是，出现了一个问题 – 在我得到“自动化错误未指定的错误”之前，甚至无法通过“A”列表，并且它永远不会在同一个位置。 我已经尝试了“正常”的步骤来解决这个问题。 我已经安装了VB 6控件，并且我已经注销并重新注册了mscomctl.ocx，并且包括On Error Resume Next（它什么都不做）。 它在死亡之前通常达到100多例（如前所述，是随机的）。 之后popup错误，当我尝试重新运行它（有或没有更改），并在第一个错误。 如果我重新启动计算机，它会让我再次尝试（无论什么原因），但它仍然没有完成。 代码是否太复杂，我需要减less它？ 我可能会find一种方法，使它只能运行每个字母（运行所有的A，然后做B的等），但我仍然无法完成字母A. 我注意到在另一个线程有人build议，而不是使用IE浏览器交换到xmlhttp – 这是一个修复？ 这个剧本太长了吗？ 我在这里做错了什么？ Sub Lookup() Range("AI1").Value = "Unique ID" Range("AJ1").Value = "Name" Range("AK1").Value = "Birth Year" Range("AL1").Value = "Title" Range("AM1").Value = "State" Range("AN1").Value = "Position" Range("AO1").Value = "Country" Range("AP1").Value = "Appointed" Range("AQ1").Value = "Credentials" Range("AR1").Value = […]

保持运行时错误VBA

我试图通过主login页面和第二个一次性密码（OTP）页面login到我的网站。 但我越来越和错误 运行时错误“-2147467259（80004005）”： 自动化错误 未指定的错误 发现在这一行： If InStr(wd.document.Title, "Sales Force Automation") <> 0 Then 我在这里做错了什么？ 我刚刚从2天前开始学习这门语言。 Dim wd As SHDocVw.InternetExplorer Sub login() Dim username As Range Dim password As Range Dim otp As Range Dim myValue As Variant Set wd = CreateObject("InternetExplorer.Application") wd.silent = True wd.navigate "Http://www.XXXXXXXXXXX.com" wd.Visible = True Set username = Range("B1") Set […]