Следующий код открывает несколько ссылок (wistia links)
Private bot As New Selenium.ChromeDriver
Sub Test()
Dim arr(), ws As Worksheet, i As Long
Set bot = New ChromeDriver
Set ws = ThisWorkbook.Worksheets("Links")
arr = Application.Transpose(ws.Range("A2:A" & ws.Cells(Rows.Count, 1).End(xlUp).Row))
Rem https://fast.wistia.net/embed/iframe/n3tweojtus
With bot
.Start "Chrome"
.Get arr(1)
For i = LBound(arr) + 1 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
Как я могу сохранить видео на диск ..?
Я заметил, что панель IDM не появляется в драйвере селена ..
Какой самый простой способ загрузить несколько ссылок (ссылки указаны в A2: A & последняя строка)?
Я пробовал эту строку
With bot
.AddExtension ThisWorkbook.Path & "\extension_6_33_2_0.crx"
и я заметил, что расширение было добавлено, но код зависает и не открывает ни одну из существующих ссылок