将指定期货最新行情数据写入Excel的代码 - 高级功能研发区 - 金字塔客服中心 - 专业程序化交易软件提供商

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 高级功能研发区 → 将指定期货最新行情数据写入Excel的代码

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

共有40617人关注过本帖树形打印复制链接主题：将指定期货最新行情数据写入Excel的代码

blackmoon

小大 21楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：9 积分：21 威望：0 精华：0 注册：2012/1/27 16:15:38

Post By：2012/1/27 17:43:39 [只看该作者]

学习

guotx2010

小大 22楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：蜘蛛侠帖子：1366 积分：5210 威望：0 精华：7 注册：2010/12/11 18:00:33

Post By：2012/5/30 11:00:03 [只看该作者]

marketlabel

sun884588

小大 23楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游民帖子：132 积分：775 威望：0 精华：0 注册：2011/12/27 11:53:44

Post By：2012/5/30 21:48:38 [只看该作者]

这个我玩过了，还是很有趣的。

liliang_nk

小大 24楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：新手上路帖子：12 积分：71 威望：0 精华：0 注册：2012/3/29 8:13:43

Post By：2012/8/1 23:37:31 [只看该作者]

For j=1 to i
  application.MsgOut "正在导出:" & StockCode(j) & "行情..."
Set Report1 = marketdata.GetReportData(StockCode(j),StockMarket(j))
MyXL.Application.activesheet.Range("C" & Cstr(j+3)) = StockCode(j)
  MyXL.Application.activesheet.Range("D" & Cstr(j+3)) = report1.BuyPrice1
  MyXL.Application.activesheet.Range("E" & Cstr(j+3)) = report1.SellPrice1
Next

请问：这段想增加品种名称买1量卖1量怎么增加？

StockCode这些函数属于什么类别，在哪查询？不是很会用，帮助里找半天没找到。。。