我有以下代码,可让我登录特定的网址,然后打开与该网站相关的多个链接
Private bot As New Selenium.ChromeDriver
Sub Test()
Dim arr(), ws As Worksheet, i As Long
Set bot = New ChromeDriver
Set ws = ThisWorkbook.Worksheets("Sheet1")
arr = Application.Transpose(ws.Range("C2:C" & ws.Cells(Rows.Count, 1).End(xlUp).Row))
With bot
.Start "chrome", "url"
.Get "/"
.FindElementById("login-trigger").Click
.FindElementById("username").SendKeys "username"
.FindElementById("password").SendKeys "password"
.FindElementByXPath("//*[@id='actions']/input").Click
Application.Wait Now + TimeValue("00:00:05")
Stop
For i = LBound(arr) To UBound(arr)
If Not IsEmpty(arr(i)) Then
.ExecuteScript "window.open(arguments[0])", arr(i)
.SwitchToNextWindow
End If
Next i
End With
End Sub
该代码可以正常工作,我可以登录网站(默认情况下,“记住我”复选框处于选中状态)..但至于在循环中打开的链接并不表示已登录的网站在..
我如何在循环中打开的所有标签中保留标志?