getHTTP с (Excel) VBA?

Question

Я ищу запрос для макроса Excel VBA, чтобы получить HTML-код веб-страницы в виде строки. Я нашел какой-то источник с getHTTPrequest, но я не могу зарегистрировать .net framwork system.dll или связать его.

Есть ли какой-нибудь дружественный к рога фрагмент? ;-) Спасибо!

Answer 1

Достаточно близко: Как отправить HTTP-запрос POST на сервер из Excel, используя VBA? & # 8212; Это даже для Excel; -)

Просто используйте вместо этого запрос GET:

objHTTP.Open "GET", URL, False

MSDN: Использование объекта WinHttpRequest COM - получение данных Использование Visual Basic

Answer 2

Вот компактная функция, которая возвращает источник практически любого указанного URL, включая HTTP и JSON.

(ссылки не требуются.)

Public Function getHTTP(ByVal url As String) As String
    With CreateObject("MSXML2.XMLHTTP")
        .Open "GET", url, False: .Send
        getHTTP = StrConv(.responseBody, vbUnicode)
    End With
End Function