Незаконный вызов javascript - PullRequest
Новая
       86

Незаконный вызов javascript

0 голосов
/ 29 мая 2020 
Dim bot As Selenium.ChromeDriver                                                                             
 Public Sub WebTest()
    Set bot = New Selenium.ChromeDriver
    Dim kys As New SeleniumWrapper.keys, arr(), i As Long
    arr = Application.Transpose(Selection)
    With bot
        .Get "https://www.gandhi.com.mx/", -1, True
        For i = LBound(arr) To UBound(arr)
            If Not IsEmpty(arr(i)) Then
                If i > 1 Then
                 .ExecuteScript "window.open('https://www.gandhi.com.mx/')"
                End If
                .FindElementByCss("[name=q]").SendKeys arr(i)
                .SendKeys bot.keys.Enter
            End If
        Next
    End With
    Application.SendKeys "{NUMLOCK}", True
    MsgBox "Completed"
End Sub

Это весь код, и я назначаю его кнопке в Excel. Код отлично работает при открытии двух или трех вкладок chrome и показывает ошибку ниже.

javascript ошибка javascript ошибка: незаконный вызов

У меня есть пробовал использовать Application.SendKeys ("^t") и его работу. Но я не мог перейти к любому другому окну во время выполнения макроса. Если я использую Ctrl + t, это приложение работает. И я получаю ошибку WindowNotFound.

А также я попытался использовать webdriver, чтобы открыть новую вкладку chrome, как показано ниже, и это не сработало. 

bot.SendKeys kys.Control, "t"
...