以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (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没有有些遗憾。 |