Pergunta

Estou procurando uma consulta para uma macro do Excel VBA para obter um código HTML da página da web como string. Encontrei alguma fonte com GethttPrequest, mas não consigo registrar o .NET FramWork System.dll ou vinculá -lo.

Algum trecho amigável de Greenhorn por aí? ;-) Obrigado!

Foi útil?

Solução

Perto o suficiente: Como posso enviar uma solicitação de postagem HTTP para um servidor do Excel usando o VBA? -é mesmo para o Excel ;-)

Basta usar uma solicitação GET:

objHTTP.Open "GET", URL, False

Msdn: Usando o objeto com Winche

Outras dicas

Aqui está uma função compacta que retorna a fonte de quase qualquer URL especificado, incluindo HTTP e JSON.

(Sem referências necessárias.)

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
Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow
scroll top