vba - 使用 Excel VBA 控制 Web 浏览器

Question

我被分配了自动化基于 Web 的任务(针对 HTTPS 网站)的任务。用户当前正在向 Excel 工作表填充数据，他们现在希望以一种直接控制浏览器并填充数据的方式自动化 Excel。

我发现 iMacros Scripting 版本是一个可能的解决方案，我想知道是否有其他类似的工具可用于控制浏览器和填充数据。

我还查看了 Selenium 客户端驱动程序，但我不确定如何在 Excel VBA 中使用它。

如有任何帮助，我们将不胜感激。

谢谢

Answer 1

您可以通过安装此处提供的工具从 Visual Basic 编辑器中使用 Selenium:

http://code.google.com/p/selenium-vba/

有一个 Selenium IDE 插件可以自动在 VBA 中录制脚本，还有一个安装包可以在 Visual Basic 编辑器中运行 Selenium 命令。

以下示例启动 Firefox，打开第一列中的链接，将标题与第二列进行比较，并将结果放入第三列中。使用的数据位于工作表中名为“MyValues”的范围内。

Public Sub TC002()
   Dim selenium As New SeleniumWrapper.WebDriver, r As Range
   selenium.Start "firefox", "http://www.google.com" 
   For Each r In Range("MyValues").Rows
     selenium.open r.Cells(, 1)
     selenium.waitForNotTitle ""
     r.Cells(, 3) = selenium.verifyTitle(r.Cells(, 2))
   Next
   selenium.stop
End Sub