在 Selenium VBA 中使用 Google Chrome（安装步骤）

Question

我什至在为 VBA 设置 Selenium 时遇到问题。我一直在网上阅读该做什么，下载 selenium ( https://github.com/florentbr/SeleniumBasic/releases/tag/v2.0.9.0 ) 添加扩展等。但是，我仍在努力获取它上班。

甚至编写我在网上找到的如下简单代码：

Public Sub Demo()
    Dim d As WebDriver
    Set d = New ChromeDriver
    Const URL = "https://www.google.com/"

    With d
        .Start "Chrome"
        .get URL
        .FindElementById("lst-ib").SendKeys "Selenium basic GitHub"
         .FindElementsByTag("form")(1).FindElementByCss("input[value='Google Search']").Click
        '.Quit
    End With
End Sub

给我一个自动化错误。

我想以与 Internet Explorer 相同的方式使用谷歌浏览器。我将不胜感激任何有关设置 selenium 的帮助，我知道我的问题可能被视为愚蠢。

Answer 1

首先，转到控制面板并卸载以前安装的 selenium，然后按照步骤 1- 下载最新版本的 chrome 并从帮助 >> 关于 Google Chrome 中确定 Chrome 的版本。你会看到类似的东西Version 75.0.3770.142 (Official Build) (32-bit)

2- 从LINK下载最新版本

3- 从以下链接下载 chromedriver 确保适合您的 chrome 版本的版本至于 Google Chrome 版本，我发布的 chromedriver 最合适的版本是ChromeDriver 75.0.3770.140

4. 现在设置 SeleniumBasic >> 设置后解压缩 chromedriver 文件chromedriver_win32.zip并将chromedriver.exe复制到 selenium 的路径这里有两种可能性：第一个 >>C:\Program Files\SeleniumBasic 第二个 >>C:\Users\%username%\AppData\Local\SeleniumBasic 将 chromedriver.exe 复制到 SeleniumBasic 路径

5. 打开新的空白excel文件>>按Alt + F11（Visual Basic编辑器）>>工具>>参考>>硒类型库

6. 插入新模块并粘贴以下代码进行测试

Sub Test()
    Dim bot         As New WebDriver
    
    bot.Start "chrome", "https://www.google.com"
    bot.Get "/"
    Stop
End Sub