Question

我正在尝试使用Selenium加载项从Excel VBE中操纵Chrome。

我已经在参考文献中加入了硒类型库。
我正在运行Chrome v67。
我已替换了Selenium中的Chromedriver.exe文件基本目录，其版本与Chrome v67兼容（即 Chromedriver版本38）。

我的VBA代码：

Public Sub seleniumtutorial()
Dim bot As New WebDriver
'bot.AddArgument "--headless"
'bot.AddArgument "--disable-extensions"
bot.Start "chrome", "http://google.com"
bot.Get "/"
bot.TakeScreenshot.SaveAs (ActiveWorkbook.Path + "/screenshot.jpg")
bot.Quit
End Sub

我收到以下错误消息：

upstream

如果我包含以下代码行，则不会出现错误消息，但是我看不到Chrome窗口：

bot.AddArgument "--headless"

如果按照我对类似问题的答案中的建议，如果我包括这一行代码，那将无法解决问题。

bot.AddArgument "--disable-extensions"

Answer 1

从VBA角度来看，您使用了错误的驱动程序类来自动执行Chrome。您已确认ChromeDriver的位置，但在您的代码中已将其完全忽略。

在此行中将WebDriver替换为ChromeDriver：Dim bot As New WebDriver

或使用：Dim bot As New Selenium.ChromeDriver

问题＃1。问题2是您收到的错误消息。使用WebDriver时，您应该会遇到运行时错误，而不是策略警告。

没有提供足够的信息来解决问题2，它可能与VBA没有任何关系。收到错误消息后，您可能希望与管理员聊天。

使用VBA和Selenium自动化Google Chrome

1 个答案: