以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  [求助]不打开K线图,能不能将一系列品种某一个指定公式的某个变量输出  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=12735)

--  作者:xwcarol
--  发布时间:2012/7/2 1:13:17
--  [求助]不打开K线图,能不能将一系列品种某一个指定公式的某个变量输出
不打开K线图,能不能将一系列品种某一个指定公式的某个变量输出
比如,我不打开主窗口的MACD ,想要得到指定品种MACD的一个参数的实时值,输出到EXCEL表格上.

--  作者:王锋
--  发布时间:2012/7/2 2:17:45
--  

示例
Set Formula = marketdata.STKINDI("if08","zj","ma(5,10,20,60)",0,0) \'调用中金所IF08合约的1分钟的MA移动平均线指标,参数依次是5,10,20,60

\'创建EXCEL对象
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = True
objExcel.Workbooks.Add

\'循环遍历得到公式线
for i = 0 to Formula.DataSize-1
\'将两条数据线插入到EXCEL第一、二列
objExcel.Cells(i+1,1).Value =Formula.GetBufData("MA1",i)
objExcel.Cells(i+1,2).Value =Formula.GetBufData("MA2",i)
objExcel.Cells(i+1,3).Value =Formula.GetBufDateData(i)
next