水户柄柑 水户柄柑
关注数: 5 粉丝数: 80 发帖数: 6,111 关注贴吧数: 7
求教关于VBA代码执行的问题 如图:(仿EXCEL表,当sheet1) 一个表 因为数量比较大 需要VBA代码求解 (手动要炸)。 Wind数据能导出来复权后区间最高收盘价。要求,在2008-8-13(C)至2008-12-29(D)这个时间区间中有个最低收盘价(该最低收盘价日wind可导出),问 该区间从初始(证监会核准日)至区间中最低收盘价日的平均收盘价 和 区间中最低收盘价日至结尾(发行日期)的平均收盘价,以及 该区间的平均收盘价。 (注:股票的单日收盘价是可以导出来的,但是一个区间好几十个交易日,外加统计的股票达几百只,求VBA算法。) 求个把代码链接起来,主要问题是 怎么把两段VBA代码给连起来。 我用600290.SH做个例子: 代码600290.SH 条件:收盘价(时间设定2008-8-13至2008-12-29),复权,交易日。代码生成器生成以下代码: Dim w_wsd_data As Variant Dim w_wsd_codes As Variant, w_wsd_fields As Variant, w_wsd_times As Variant Dim w_wsd_errorid As Long '该函数返回值是一个三维数组,第一维是指标,第二维是windcode,第三维是时间 w_wsd_data = vba_wsd("600290.SH","close","2008-08-13","2008-12-29", "PriceAdj=F", w_wsd_codes, w_wsd_fields, w_wsd_times, w_wsd_errorid) 楼主小白,纯新,求教怎么把这个代码给用起来,如开篇和结尾都需要什么指令 什么意思,另求高手帮个忙把这个给完成了,设 把结果输入至F(2-801)的完整执行代码。 附上一枚别人帮我设定好的数据:(P:第二张图别问我什么意思 我看不懂)
1 下一页