Как извлечь вложенное значение диапазона - PullRequest
0 голосов
/ 02 августа 2020

Мне нужно извлечь стоимость акций и название валюты из WEB с помощью VBA. Данные во вложенных промежутках. Возможно ли это вообще?

<span>
  <span jscontroller="q6ctOd" jsdata="Sosln;;Bq6wug" jsaction="rcuQ6b:npT2md;fw_pvu:SX8lEe">
    <span class="IsqQVc NprOob XcVN5d" jsname="vWLAgc">2.692,00</span>
    <span class="knFDje" jsname="T3Us2d">EUR</span>
  </span>
</span/>

Сайт: https://www.google.co.uk/search?client=firefox-b-e&q=amazon+share

Sub DataExtract()

Dim HTTP, x1 As Object, Htmldoc As New HTMLDocument
Set HTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

With HTTP
    .Open "GET", "https://www.google.co.uk/search?client=firefox-b-e&q=amazon+share", False
    .setRequestHeader "User-Agent", "Firefox"
    .send
    Htmldoc.body.innerHTML = .responseText
End With

'Set x1 = how to get the element?
extractedelement = x1
Debug.Print extractedelement

End Sub

Заранее спасибо за вашу помощь.

...