Запросите элемент div по имени класса с помощью Excel VBA

я пытаюсь получить данные в Excel элемента div с определенным именем класса, например:


   <span>Text1</span>
   <span>Text2</span>

Мой код VBA:

Sub GetData()
Dim oHtml       As HTMLDocument
Dim oElement    As Object

Set oHtml = New HTMLDocument

With CreateObject("WINHTTP.WinHTTPRequest.5.1")
    .Open "GET", "http://www.example.com/", False
    .send
    oHtml.body.innerHTML = .responseText
End With

For Each oElement In oHtml.getElementsByClassName("myClass")
    Debug.Print oElement.Children(0).src
Next oElement
End Sub

Это возвращает ошибку: Ошибка времени выполнения: '438': Объект неt поддерживает это свойство или метод. Ошибка находится на линии Debug.Print ...

Я активировал следующие ссылки: Microsoft HTML Object Library Microsoft Internet Controls

Я хочу иметь возможность выделить текст в первом или втором отрезке и вставить его в ячейку, как я могу это сделать?

Ответы на вопрос(2)

Ваш ответ на вопрос