Получение ошибки автоматизации при открытии сайта

Question

Привет, я получаю «Ошибка автоматизации» в моем коде VBA:

Set Doc = IE.document

, когда я отлаживаю, я получаю вышеупомянутое как виновника, когда я наводю курсор мыши на Doc, и IE.document выдаетошибка автоматизации

Application.ScreenUpdating = False
    Application.DisplayAlerts = False

    Dim IE As New InternetExplorer
    IE.Visible = True

    Dim Doc As HTMLDocument
    Set Doc = IE.document


    Dim Np As String

    For line = 2 To lp

        ipp = Worksheets("sheet1").Cells(line, 1).Value

        If ipp <> "" Then

            IE.navigate ipp

            Do
                DoEvents
            Loop Until IE.readyState = READYSTATE_COMPLETE

            Np = Doc.getElementsByName("TITLE")(0).innerText


        End If
        IE.Quit
    Next line


End Sub

Answer 1

Каждый раз, когда вы загружаете новую страницу, вам необходимо обновить ссылку на вновь загруженный документ:

Set Doc = IE.document

... сразу после цикла Do