在查找电子邮件地址是否有效时,我遇到了这样的问题,其中来自网站的占位符始终隐藏我的excel输入,并且不会转到下一个命令。 还需要从excel地址中的电子邮件地址旁边的网页内部文本捕获消息。
使用VBA Web将在Web的“登录”页面中输入来自excel单元格A2的电子邮件,然后单击“下一步”。
configure.ac
如果出现类似“帐户不存在。输入其他帐户”之类的错误,请在excel中A2单元格前面提及“错误”,否则为“有效”。它将继续前进到单元格A2中的下一个值,直到最后一个值。 (用于Web循环的VBA)
答案 0 :(得分:0)
该网站正在期待按键。在IE中找到一种方法(可能是通过FireEvent来触发),或者切换到使用Selenium basic。安装selenium basic后,进入VBE>工具>引用,并添加对Selenium类型库的引用。
Option Explicit
Public Sub test()
Dim d As ChromeDriver, loginDetails(), ws As Worksheet, i As Long
Set ws = ThisWorkbook.Worksheets("Sheet2")
loginDetails = ws.Range("A1:B2").Value ' Column A has email, col B has password
Set d = New ChromeDriver
With d
.get "https://login.live.com/"
For i = LBound(loginDetails, 1) To UBound(loginDetails, 1)
.FindElementById("i0116").SendKeys loginDetails(i, 1)
.FindElementById("idSIButton9").Click
'Other code ....
Next
.Quit
End With
End Sub