2

目前我可以使用 IE 完成此操作

Dim ie As InternetExplorer
Set ie = New InternetExplorer
ie.Navigate "www.google.com"
ie.document.getElementByID("blah").value = "blah"

我很好奇是否有一种方法可以导航到网站并使用除 IE 和 VBA 以外的方式填写信息，例如使用 FireFox 或 Chrome

我知道如何使用任何浏览器（例如 Chrome，如下所示）导航到其他网站，但我想知道如何使用 Chrome 填写 www.google.com 上的搜索字段等字段

call Shell("C:\Program Files\Google\Chrome\Application\chrome.exe"& " " & URL)
4

2 回答 2

3

您可以使用这个Selenium 包装器来驱动 Chrome 或 Firefox（或 PhantomJS）。请注意，它目前处于测试阶段。安装后，添加对 Selenium 类型库的引用或使用后期绑定（下面的示例）。

在我（非常）有限的测试中，唯一明显的区别是加载驱动程序需要几秒钟。

这是上面链接中的一个简单示例（修改为使用后期绑定），它填写了 Google 中的搜索字段并单击了搜索按钮：

Dim selDriver As Object
Set selDriver = CreateObject("Selenium.WebDriver"）

selDriver.Start "chrome", "http://www.google.com/"
selDriver.Open "http://www.google.com"
selDriver.Type "name=q", "Eiffel Tower"
selDriver.Click "name=btnG"

selDriver.stop
于 2013-05-15T18:56:32.123 回答
1

自 2016 年起，Selenium 包装器已移至 Github，而不是上面的 Google 地址。此外，如果您使用的是 Chrome，您需要在此处更新 Google Chrome 的网络驱动程序。

硒基础

下载这些项目后，您需要按照上述说明从 Excel 中将库添加到 Visual Basic 编辑器中。这样做之后，您应该能够按照最初的要求使用 vba 和 chrome 填写 Web 表单。

于 2018-04-09T22:31:16.143 回答