Как перейти к другим chrome windows, пока мой код VBA работает на одном chrome окне - PullRequest
0 голосов
/ 30 апреля 2020

У меня есть код VBA для автоматизации поиска и код выглядит следующим образом.

**Sub chrome()
Dim myArray As Variant
myArray = Excel.Application.Selection
obj.Start "chrome", ""
For Each element In myArray
obj.Get "url here"
obj.FindElementByName("q").SendKeys (element)
obj.FindElementById("start-search").Click
Application.SendKeys ("^t")
obj.SwitchToNextWindow
Next element
Application.SendKeys "{NUMLOCK}", True
MsgBox "Completed"
End Sub**

Проблема в том, что chrome очень медленно работает во время работы макроса. Он загружает каждую вкладку одну за другой, и после завершения загрузки открывается другая вкладка. Это замедляет мой процесс. Я создаю этот макрос, чтобы минимизировать время, но кажется, что он занимает очень много времени. Я не могу работать с окном без головы chrome, так как мне нужно окно после загрузки всех вкладок. Я попытался заставить окно chrome работать на заднем плане, чтобы я мог работать с другим окном chrome, пока мой макрос не запустится, но как только я перехожу к новому окну chrome, код vba показывает ошибку как "nosuchwindowerror" "окно не найдено". Я искал решение, в котором я мог бы открыть вкладки поиска сразу же, как загружается предыдущая вкладка, и не ждать, пока она полностью загрузится. Или же я могу сделать свое окно chrome открытым через код vb для работы на заднем плане и чтобы я мог работать с другим окном на переднем плане.

...