我正在寻找股票指数的实时值,例如道琼斯指数 (DJIA) 或恒生指数 (HSI)。
这些需要从一组(可配置的)索引符号中生成,并保存到 VBA 变量中,而无需与工作表进行任何交互。理想情况下,这将来自彭博或雅虎(如果需要)(尽管任何其他来源也可以,只要它是实时的)。
我知道这是一项简单的任务,尽管我找不到任何直接的方法——只有获取期权价格或股票数据等的示例。我知道我从对彭博 API 的引用开始,但我似乎无法比这更进一步。
谢谢你的帮助
我正在寻找股票指数的实时值,例如道琼斯指数 (DJIA) 或恒生指数 (HSI)。
这些需要从一组(可配置的)索引符号中生成,并保存到 VBA 变量中,而无需与工作表进行任何交互。理想情况下,这将来自彭博或雅虎(如果需要)(尽管任何其他来源也可以,只要它是实时的)。
我知道这是一项简单的任务,尽管我找不到任何直接的方法——只有获取期权价格或股票数据等的示例。我知道我从对彭博 API 的引用开始,但我似乎无法比这更进一步。
谢谢你的帮助
如果您想使用 Bloomberg API 检索实时数据,您需要成为 Bloomberg 订阅者 ($$$)。正如您还提到雅虎,它是免费的,我怀疑这不是您想要的。
这不是一项简单的任务。
您需要为http://www.google.com/finance?q=GOOG发起 HTTP GET 请求,并自行解析返回字符串。
HTTP 请求使用以下代码发送:
Set HttpReq = CreateObject("MSXML2.ServerXMLHTTP")
HttpReq.Open "GET", "http://www.google.com/finance?q=GOOG", False
HttpReq.send
MsgBox HttpReq.responseText