excel - 如何使用 Excel 公式（无 VBA）在 HTTP POST 响应中检索一段数据？

Question

有没有办法制作一个 Excel 超链接公式，该公式会在单击时发送 HTTP POST 并解析响应以填充另一个单元格？

Answer 1

[编辑] 抱歉，我没有在您的标题中看到“ no vba ”。但我看不出你会怎么做。

您可以使用 vba 来完成，并在这些线程上找到有价值的信息：

• 如何使用 VBA 从 Excel 向服务器发送 HTTP POST 请求？

• 从 Excel 中执行 HTTP Post 并解析结果

这是一个代码示例：

'Send the request
Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
   URL = "http://www.somedomain.com"
   objHTTP.Open "POST", URL, False
   objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
   objHTTP.send ("")

'Get the result
myText = objHTTP.responseText

'Set it in the current cell
ActiveCell.Value = myText

问候，

Answer 2

Public Function HttpPOST(ByVal URL As String) As String
    Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
    objHTTP.Open "POST", URL, False
    objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
   objHTTP.send ("")
   myText = objHTTP.responseText
   getHTTP2 = myText

End Function