以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://www.weistock.com/bbs/index.asp)
--  高级功能研发区  (http://www.weistock.com/bbs/list.asp?boardid=5)
----  VBA中没有换手率??  (http://www.weistock.com/bbs/dispbbs.asp?boardid=5&id=53741)

--  作者:solarhe2006
--  发布时间:2013/7/8 18:11:48
--  VBA中没有换手率??

ReportData 中为什么没有查询到换手率?

 


--  作者:王锋
--  发布时间:2013/7/8 22:33:00
--  

Fincance 对象

该对象记录了指定证券的一些财务信息。

属性

PowerCount         除权数据个数

PowerDate          设置或读取基于零索引的指定序号的除权日期

PowerGive          设置或读取基于零索引的指定序号的每股送红股股数

PowerPei           设置或读取基于零索引的指定序号的每股配股股数

PowerPeiPrice      设置或读取基于零索引的指定序号的每股配股价

PowerProfit        设置或读取基于零索引的指定序号的每股红利

PowerCITM          设置或读取基于零索引的指定序号的直接上市股数

方法

GetFincance        取指定财务数据

Sort               按指定顺序排序除权数据

 

GetFincance 方法

取指定财务数据

GetFincance(Type)

Type        含义:0流通股(万股);1总股本(万股);2国家股(万股)3发起人法人股(万股);4法人股(万股)5B股(万股);6H股(万股)7流通A股(万股);8职工股(万股)9A2转配股(万股);10总资产(千元)11流动资产(千元);12固定资产(千元)13无形资产(千元);14长期投资(千元)15流动负债(千元);16长期负债(千元)17资本公积金(千元);18每股公积金(千元)19股东权益(千元);20主营收入(千元)21主营利润(千元);22其他利润(千元)23营业利润(千元);24投资收益(千元)25补贴收入(千元);26营业外收支(千元)27上年损益调整(千元);28利润总额(千元)29税后利润(千元);30净利润(千元)31未分配利润;32每股未分配(元)33每股收益(元);34每股净资产(元)35调每股净资(元);36股东权益比37净资收益率38经营现金流入39经营现金流出40经营现金流量41投资现金流入42投资现金流出43投资现金流量44筹资现金流入45筹资现金流出46筹资现金流量47现金及等价物48应收帐款周转率49存货周转率50股东总数51发行价52发行量53主营业务增长率54税后利润增长率55净资产增长率56总资产增长率

返回值      返回指定的财务数据


--  作者:solarhe2006
--  发布时间:2013/7/9 9:36:55
--  

ReportData 中添加换手率最好了,后台都有,VBA没有有些遗憾。