示例
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