Excel VBA，parsing来自HTTP请求的响应

这感觉应该是非常简单，但我有点卡住了。 我想要使​​用Excel VBA访问APIurl。 API给了我一个非常简单的JSON响应，其中包含一个负载ID，用作调用另一个API的参数，另一个API不是问题，因为我可以获取XML或CSV中的响应，并将其parsing为Excel 。

API响应：{“loadid”：“1234567890”}

我需要从这个响应中提取的是数字“1234567890”。

这是我迄今为止所尝试的：

Sub getLoadID() Dim loadID As String Dim loadIDUrl As String loadIDUrl = "blah blah" proxyServer = Worksheets("Sheet1").Range("A1").Value Set httpReq = CreateObject("WinHttp.WinHttprequest.5.1") httpReq.Open "GET", loadIDUrl, False httpReq.setRequestHeader "Content-Type", "text/xml" httpReq.setProxy 2, proxyServer, "" httpReq.setTimeouts -1, -1, -1, -1 httpReq.send request httpReq.ResponseText = loadID Worksheets("Sheet1").Range("A2").Value = loadID End Sub 

我试图把整个string放到一个单元格中，以确保Excel能够从响应中获取string，但向前将只是很乐意将该值存储为variables，而不是将其写入到表单中。

上面的代码运行没有错误，我只是没有得到单元格A2中的string…

每次我search使用Excel VBAparsingJSON的时候，每个人都build议使用外部库，但是我试图在工作中这样做，所以我不能使用外部库。

干杯