【记录】Excel 2021｜（三）VBA使用Selenium自动登录网页-Toy模板网

这篇具有很好参考价值的文章主要介绍了【记录】Excel 2021｜（三）VBA使用Selenium自动登录网页。希望对大家有所帮助。如果存在错误或未考虑完全的地方，请大家不吝赐教，您也可以点击"举报违法"按钮提交疑问。

1 安装 Selenium Basic

首先需要安装Selenium Basic，才能在工具栏中找到Selenium Type Library。

在安装Selenium Basic之前，请确保您的计算机上已安装Visual Basic for Applications（VBA）。VBA是Microsoft Office应用程序（如Excel、Word等）中使用的宏语言。

安装Selenium Basic方法如下：

首先，下载Selenium Basic安装程序。您可以从以下链接下载最新版本的Selenium Basic：https://florentbr.github.io/SeleniumBasic/，如果打不开那就打开这个链接https://github.com/florentbr/SeleniumBasic/releases/。
下载安装程序exe：
运行Selenium Basic安装程序，并按照安装向导的指示进行操作。在安装过程中，您可以选择要安装的浏览器驱动程序，例如ChromeDriver、FirefoxDriver等。（就是一路Accept、next）
安装完成后，启动Excel，并在VBA编辑器中选择“工具”菜单，然后选择“引用”。
在“可用引用”列表中，找到“Selenium Type Library”并选中该库，然后单击“确定”按钮。这将向您的VBA项目中添加对Selenium Basic的引用。
现在，您可以在VBA项目中编写使用Selenium Basic的代码，并运行它。

请注意，如果您使用的是64位版本的Office，您可能需要使用64位版本的Selenium Basic。同样，如果您使用的是Mac或Linux系统，您需要使用相应的Selenium Basic版本。

2 下载webdriver

参考：Selenium for VBA的配置-知乎-语言堂

保证浏览器driver 和你的浏览器版本相配，以Chrome为例: ChromeDriver - WebDriver for Chrome - Downloads
我的是111，所以下载111版本，下载链接。
将匹配的driver 复制到 SeleniumBasic 的安装文件夹 ,例如： C:\Users[你的用户名]\AppData\Local\SeleniumBasic
下载 MS .Net 3.5 ： Download Microsoft .NET Framework 3.5 from Official Microsoft Download Center
注意：点开了就能下载，如果没弹出下载说明网络有问题，可以尝试点击手动下载。

这一步很重要，没有.Net，运行VBA的时候会出现Automation Error的报错。

3 自动登录

安装好1、2步骤后，重新打开Excel程序，然后打开宏编辑窗口：

【记录】Excel 2021｜（三）VBA使用Selenium自动登录网页
一个简单的脚本如下：

Sub LoginToWebsite()
    Dim driver As New ChromeDriver
    Dim URL As String
    Dim MyLogin As String
    Dim MyPassword As String
    
    '设置网站登录页面的URL
    URL = "http://10.12.xxx.xx/ui/sessions/signin"
    
    '设置登录信息
    MyLogin = "myname"
    MyPassword = "mypasswd"
    
    '打开Chrome浏览器
    driver.Start "Chrome"
    
    '访问登录页面
    driver.Get URL
    
    '输入用户名和密码
    driver.FindElementById("username").SendKeys MyLogin
    driver.FindElementById("passwd").SendKeys MyPassword
    
    '提交登录表单
    driver.FindElementById("signin_button").Click
    
    '等待页面加载
    driver.Wait 5000
    
    '检查是否成功登录
    If InStr(driver.PageSource, "仪表板") > 0 Then
        MsgBox "登录成功！"
    Else
        MsgBox "登录失败！"
    End If
    
    '关闭浏览器
    driver.Quit
End Sub

只要在网页上找到输入框的id，再把账号密码填进去就完事了。

【记录】Excel 2021｜（三）VBA使用Selenium自动登录网页

本账号所有文章均为原创，欢迎转载，请注明文章出处：https://blog.csdn.net/qq_46106285/article/details/129613315。百度和各类采集站皆不可信，搜索请谨慎鉴别。技术类文章一般都有时效性，本人习惯不定期对自己的博文进行修正和更新，因此请访问出处以查看本文的最新版本。文章来源地址https://www.toymoban.com/news/detail-507008.html

到了这里，关于【记录】Excel 2021｜（三）VBA使用Selenium自动登录网页的文章就介绍完了。如果您还想了解更多内容，请在右上角搜索TOY模板网以前的文章或继续浏览下面的相关文章，希望大家以后多多支持TOY模板网！