欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → VBA取图表的参数

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有6745人关注过本帖树形打印复制链接

主题:VBA取图表的参数

帅哥哟,离线,有人找我吗?
yukizzc
  21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/8/2 12:31:58 [只看该作者]

宏名那边自己输入gethc222

然后去执行


 回到顶部
帅哥哟,离线,有人找我吗?
madson
  22楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 13:50:19 [只看该作者]

Formula.DataSize-1
这么写,是可以的,试一下就知道了。

不过还是想问个问题,GetGridByIndex,这个索引的顺序是怎么样的?如果不是严格的水平垂直切分的窗格,索引排序又是怎么样的呢?

 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/8/2 14:05:29 [只看该作者]

右键-框架属性-联动

根据该顺序来


 回到顶部
帅哥哟,离线,有人找我吗?
madson
  24楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 14:12:13 [只看该作者]

这个顺序好像不能更改,虽然改了名字,但排序还是不变,是这样吧?
这个排序是根据建立框架时生成的

 回到顶部
帅哥哟,离线,有人找我吗?
madson
  25楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 14:22:59 [只看该作者]

运行宏时显示:调用了尚未启动运行框架中的属性和方法

我想在一个宏里实现对多个框架的操作,不能实现吗?或者说,访问框架中窗格的指标值 ,一定要打开这个框架吗?

 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  26楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/8/2 15:42:57 [只看该作者]

是的,不支持修改

话说如果你要指定的话自己直接根据名称来就行了,就好比持仓栏轮询,具体要选择哪一个你在代码里是自己要再做处理的,而不是通过编号去直接得到自己需要的对象

是的,框架必须打开。本身就是框架对象你不打开怎么获取

如果你要获取指标值,直接用stkindi就行了,这个不依据窗格的


 回到顶部
帅哥哟,离线,有人找我吗?
madson
  27楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 16:37:33 [只看该作者]

'创建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

以上是将数据写入新建的Excel,请版主指教,我想把数据写入到的:"C:\temp.docx"的文件,该如何写代码??



 回到顶部
帅哥哟,离线,有人找我吗?
madson
  28楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 16:39:42 [只看该作者]

谢谢版主

 回到顶部
帅哥哟,离线,有人找我吗?
yukizzc
  29楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:21598 积分:0 威望:0 精华:1 注册:2010/7/31 16:35:30
  发帖心情 Post By:2016/8/2 16:54:16 [只看该作者]

Set obj = CreateObject("Excel.Application")
Set OFile = obj.Workbooks.Open("G:\buyorders.xls")
obj.Visible = false
Set objSheet = OFile.Sheets(1)

 

 

建议你百度个excel vb操作大全,基本说明看那个比这么问来的高效的多,编程看专门编程手册这应该是一个好习惯的


 回到顶部
帅哥哟,离线,有人找我吗?
madson
  30楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:113 积分:0 威望:0 精华:0 注册:2016/6/6 17:25:45
  发帖心情 Post By:2016/8/2 16:55:46 [只看该作者]

谢谢版本,这个问题解决了,好好补一下

 回到顶部
总数 35 上一页 1 2 3 4 下一页