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


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 如何获得A股的所有股票代码

   

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


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

主题:如何获得A股的所有股票代码

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


加好友 发短信
等级:论坛游侠 帖子:130 积分:0 威望:0 精华:0 注册:2015/9/13 18:43:06
如何获得A股的所有股票代码  发帖心情 Post By:2015/9/25 18:41:18 [显示全部帖子]

请教一下如何在VBA下获得A股市场所有的股票代码(排除300ETF基金之类),同时确定其中的哪些股票是停牌无法交易的。
哪位老师指导 一下。谢谢。

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


加好友 发短信
等级:论坛游侠 帖子:130 积分:0 威望:0 精华:0 注册:2015/9/13 18:43:06
  发帖心情 Post By:2015/9/26 0:33:31 [显示全部帖子]

另一个问题是上海A股,用SH表示,深圳用SZ。那么深圳创业,也是用SZ表示的么?

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


加好友 发短信
等级:论坛游侠 帖子:130 积分:0 威望:0 精华:0 注册:2015/9/13 18:43:06
  发帖心情 Post By:2015/9/28 10:57:26 [显示全部帖子]

谢谢王老师。
再请教一下
确定其中的哪些股票是停牌无法交易的。使用ISNULL(DYNAINFO()))?

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


加好友 发短信
等级:论坛游侠 帖子:130 积分:0 威望:0 精华:0 注册:2015/9/13 18:43:06
  发帖心情 Post By:2015/9/28 11:03:46 [显示全部帖子]

 if isnull(Report1.dynainfo(17)) then msgbox  "null" else msgbox  "Y"
我用这个测出来好象都是NULL,不管有没有交易

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


加好友 发短信
等级:论坛游侠 帖子:130 积分:0 威望:0 精华:0 注册:2015/9/13 18:43:06
  发帖心情 Post By:2015/9/28 11:06:42 [显示全部帖子]

set Report1 = marketdata.GetReportData("601579","SH")
 'set Report1 = marketdata.GetReportData("002242","SZ")
 if isnull(Report1.dynainfo(18)) then msgbox  "null" else msgbox  "Y"
都是NULL,好象有没有停牌都没有区别

 回到顶部