Я пытаюсь автоматизировать задачи браузера с помощью Excel VBA. Нужно нажать несколько URL для тестирования. Я пытался поразить каждый URL в цикле, но каждый раз браузер IE открывается в одном сеансе.
Я пытаюсь автоматизировать задачи браузера с помощью Excel VBA. Нужно нажать несколько URL для тестирования. Я пытался поразить каждый URL в цикле, но каждый раз браузер IE открывается в одном сеансе. Помогите, пожалуйста, изменить код, чтобы открывать закрытие, т.е. сеанс каждый раз, и открывать в новом сеансе.
Sub test()
' open IE, navigate to the desired page and loop until fully loaded
Set IE = CreateObject("InternetExplorer.Application")
my_url = "*****UL*******"
With IE
.Visible = True
.Navigate my_url
End With
Application.Wait (Now() + TimeValue("0:00:10"))
Application.SendKeys "Username"
Application.SendKeys "{TAB}"
Application.Wait (Now() + TimeValue("0:00:10"))
Application.SendKeys "Password"
Application.SendKeys "{TAB}"
Application.SendKeys "{RETURN}"
Do Until Not IE.Busy And IE.readyState = 4
DoEvents
Loop
Set IE = Nothing
End Sub
Execting IE bowse, чтобы каждый раз открывать новую сессию. Пожалуйста, помогите изменить код