2012-07-29 83 views
0

我期待獲得道瓊斯指數(DJIA)或恆生指數(HSI)等股指的實時值。獲取實時股票指數值的VBA代碼

這些需要從(可配置的)一組索引符號生成,並保存到VBA變量中,而無需與工作表進行任何交互。理想情況下,這將來自彭博或雅虎(如果需要的話)(儘管任何其他來源也可以,只要它是活的)。

我明白這是一個簡單的任務,雖然我找不到任何直接的方法 - 只有獲取期權價格或股票數據等的例子。我知道我從彭博API的參考開始,但我似乎無法超越這一點。

感謝您的幫助

回答

0

這不是一個簡單的任務。

您需要爲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 
+0

謝謝尤里,這是一個很大的幫助 - 數據延遲15分鐘,但比沒有更好的方式。我想知道是否有一種方法可以更直接地使用引用庫(如http://www.vbafin.com/Bloomberg-data-download-vba-code.php)?再次感謝。 – 2012-07-29 16:57:27

1

如果你想檢索使用彭博API實時數據,你需要一個用戶彭博($$$)。正如你還提到免費的雅虎,我懷疑這不是你想要的。