VBA - Excel web service call through XMLHttp

You will need a reference to the library "Microsoft XML, v6.0".


Sub getWebServiceX()

    Dim req As New MSXML2.XMLHttp

    req.Open _
        "GET" _
        , "http://www.webservicex.com/stockquote.asmx/GetQuote?symbol=GOOG" _
        , False
        
    req.send
    MsgBox req.responseText

End Sub