VBA里獲取不到SAR指標值
作者：金字塔 來源：cxh99.com 發布時間：2017年07月02日
- 咨詢內容：
msgbox FormulaSar.GetBufData("SAR",Data1.Count-i)總是結果出錯，后來發現公式SAR沒有顯示值，就簡單的“SAR(P,STEP,MAXP),CIRCLEDOT”，后來給SAR加了顯示值，如“SARV:SAR(P,STEP,MAXP),CIRCLEDOT”，也是調用失敗，后來自己手動新加了一個公式也調用失敗，請問應該如何調用，謝謝
- 金字塔客服：
完整貼下你的FormulaSar代碼呢
光看這句看不出問題可能
- 用戶回復：
Set Data1= marketdata.GetHistoryData("if06","zj",6)
Set Formula =
marketdata.StkindiByData("SAR",Data1)
for i=Data2.Count-20 to Data2.Count-1
msgbox Formula.GetBufData("SAR",Data1.Count-i)
next
如果換成MACD就成功了
Set Data1= marketdata.GetHistoryData("if06","zj",6)
Set Formula = marketdata.StkindiByData("MACD",Data1)
for i=Data2.Count-20 to Data2.Count-1
msgbox Formula.GetBufData("DEA",Data1.Count-i)
next
- 網友回復：
Sub UserForm1_CommandButton1_Click()Set Data1= marketdata.GetHistoryData("if06","zj",2)Set Formula = marketdata.StkindiByData("SAR",Data1)for i=1 to 5
msgbox Formula.GetBufData("SARV",Data1.Count-i)next
End Sub上面的失敗
Sub UserForm1_CommandButton1_Click()Set Data1= marketdata.GetHistoryData("if06","zj",2)Set Formula = marketdata.StkindiByData("MACD",Data1)for i=1 to 5
msgbox Formula.GetBufData("DEA",Data1.Count-i)next
End Sub成功
- 網友回復：
您先看下SAR指標
里面有沒有sarv這個指標輸出變量
打印本文
關閉窗口