Excel VBA Web Scraping не ссылается на созданный объект inte rnet explorer

Question

Я пытаюсь получить данные с веб-сайта, который требует ввода в формы. Приведенный ниже код открывает новое окно проводника inte rnet, но затем, когда он достигает указанной строки, появляется ошибка 462 времени выполнения, в которой говорится, что удаленный сервер не существует или недоступен. Разве новое окно не присваивается объекту ie?

Sub Code()
    Dim ie As Object
    Dim ht As HTMLDocument
    Dim result As String



    'Browser Initialization
    Set ie = CreateObject("InternetExplorer.Application")
    ie.Visible = True
    ie.navigate "url"

--->Do While ie.Busy Or ie.readyState <> 4
        Application.Wait Now + TimeValue("00:00:01")
    Loop

    Set ht = ie.document
    ie.Quit
End Sub

Это выдает ту же ошибку в строке набора ht = ie .document, если я избавлюсь, если l oop .Я работаю на Windows 10, это проблема?