如何通过Excel VBA使用Selenium点击href为add_record.php的链接

目标元素参考代码 #

你提供的站点对应元素代码如下：

<li class="active">
<a href="lab_dashboard.php"><i class="fa fa-dashboard"></i><span>Dashboard</span></a></li>
<li class=""><a href="add_record.php"><i class="fa fa-link"></i> <span>Add New Record</span></a></li>
<li class=""><a href="fetch_srf_record.php"><i class="fa fa-link"></i> <span>Add Record from SRF Portal</span></a></li>
<li class=""><a href="list_records.php"><i class="fa fa-link"></i> <span>List/Edit/Followup</span></a></li>
<a href="#">

前置条件 #

你需要先完成Selenium基础配置：

• 已在Excel VBA编辑器的「工具-引用」中勾选 Selenium Type Library
• 已初始化对应浏览器的驱动对象并成功打开目标站点页面

可用实现代码 #

方法1：CSS选择器定位（推荐，写法简洁） #

直接匹配href属性值即可定位到目标元素：

' 已提前定义并初始化驱动，如 Dim driver As New ChromeDriver
driver.FindElementByCss("a[href='add_record.php']").Click

方法2：XPath定位 #

适配更复杂的元素匹配场景，兼容性更强：

driver.FindElementByXPath("//a[@href='add_record.php']").Click

可选优化 #

如果页面加载速度慢，建议增加等待逻辑，避免元素未加载完成导致的报错：

' 显式等待元素加载，最长等待10秒（单位为毫秒）
driver.FindElementByCss("a[href='add_record.php']", 10000).Click

内容的提问来源于stack exchange，提问作者Joseph John