打印本文打印本文 关闭窗口关闭窗口

问一个简单的问题,如何执行macro?

作者:金字塔 来源:cxh99.com 发布时间:2014年08月23日
  • 咨询内容: 请教:如何执行macro?
    Sub Test1()
     '该示例将把技术分析主图上的MA指标前两条线输出到EXCEL中,使用前请注意将K线主图打开,并显示MA指标
     ' 得到框架名称为"Technic",窗格名称为"Main"的窗格对象
     Set Grid = Technic.GetGridByName("Main")
     Set Formula = Grid.GetFormulaByIndex(1)
     
     '创建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)
     next
     
     End Sub 这是个例子,但不知如何执行来看一下结果

    [此贴子已经被作者于2014/6/11 11:11:11编辑过]

     

  • 金字塔客服:  

    金字塔VBA编程教程

    在线观看:http://v.youku.com/v_show/id_XMTY3MjE1NjY0.html

    本地下载:http://www.weistock.com/video/金字塔VBA编程教程_标清.flv

打印本文打印本文 关闭窗口关闭窗口