搜索
紧急:明日1只100%涨停刚刚A股最新利好消息!中线单股之创业板里的“茅台”A股十年启示录
注册送资金13148474507通知:今日1只100%涨停板炒股七大制胜法宝金融书籍5折包邮
实盘开启稳定获利【惠天财经】在线视频教育期货实战训练营微信macdcn打卡领金币
老股民炒股票T+0月赚百万 股票期货★在线直播教学港股佣金0.08%支持融资融券洞察主力动向 精准短线操作
查看: 69296|回复: 93

用EXCEL动态观看K线图,可用做模拟交易。(原创)

[复制链接]
发表于 2006-6-17 21:03 | 显示全部楼层

用EXCEL动态观看K线图,可用做模拟交易。(原创)

来自:MACD论坛(bbs.macd.cn) 作者:imasom 浏览:69296 回复:93

用法,下载下面的文件,
当做模板文件,可以把你的数据按文件里的格式放置。
按右上角的按钮就行了。
最右的按钮是设K线的数量的,
中间是重置。
最左是执行,每按一次往前走一条K线。

这是EXCEL里宏的代码,没毒的呀!
{
Public II
Public KK

Sub stockk()
If KK = "" Then
    Call Set_number_Kline
End If

If II = "" Then
    II = 4
End If
II = II + 1

Call Chartt
End Sub
Sub Chartt()
ActiveSheet.ChartObjects("图表 1").Activate
ActiveChart.SetSourceData Source:=Sheets("C0611_206-616").Range("A" & II - 1 & ":E" & II + KK) _
        , PlotBy:=xlColumns
End Sub
Sub reset()
If KK = "" Then
    Call Set_number_Kline
End If
II = 4
End Sub
Sub Set_number_Kline()

KK = InputBox("Pls input the K_line Number:")

End Sub

}

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
参与人数 1奖励 +12 时间 理由
夕阳武士㊣ + 12 2006-6-17 21:19 帖子很棒,加分鼓励,期待您更多优秀帖子 .

查看全部评分

金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

发表于 2006-6-18 23:42 | 显示全部楼层
3Q
金币:
奖励:
热心:
注册时间:
2004-11-1

回复 使用道具 举报

发表于 2006-6-19 15:07 | 显示全部楼层
好啊!我试试,谢楼主.
金币:
奖励:
热心:
注册时间:
2003-7-22

回复 使用道具 举报

发表于 2006-6-19 17:44 | 显示全部楼层
我试用了,其实我早就有这个想法,可是自己的电脑水平不行,对Excel更是只懂得一点点皮毛。但是想提出我的一些想法,希望贴主能够帮忙改进一下。

1.这个宏我运行之后发现图表和数字是在一个页面之中的,不太好看,因此将图表挪到另一页中,但是无法引用数据。我知道有函数可以做到,但我不懂。希望贴主能够改进一下。

2.能否将成交量的数量改小一些,或者干脆和K线的数据分开,否则有时会导致成交量的图形和K线的图形混在一起了。

3.能够同时在其中加入买进、卖出的命令窗口?比如按“买进”按钮,然后出现买进的对话框,这样可以输入买进数量、价格等等。同理,卖出也是如此。然后最后有一个统计盈亏的功能。

4.最好能够自动生成数据(比如用随机函数),同时遵守涨跌停板的规定(可以自定义涨跌极限百分比)。这样就不用再输入数据了,而且既然是随机数字,那么用来测试交易系统就很好了。

我知道这个做起来很麻烦。但是希望贴主能够帮忙一下。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
金币:
奖励:
热心:
注册时间:
2001-12-4

回复 使用道具 举报

 楼主| 发表于 2006-6-19 21:36 | 显示全部楼层
原帖由 eikc 于 2006-6-19 17:44 发表
我试用了,其实我早就有这个想法,可是自己的电脑水平不行,对Excel更是只懂得一点点皮毛。但是想提出我的一些想法,希望贴主能够帮忙改进一下。

1.这个宏我运行之后发现图表和数字是在一个页面之中的,不太好 ...

---------------------------------------------------------------------------------------------------------------------------
第1个问题:
     你可以复制原来的工作表,在新的工作表里删掉数据是无所谓的。引用的还是原来工作表里的数据。
第2个问题:
     你把下面这句话里的“A”改为“B”:
ActiveChart.SetSourceData Source:=Sheets("C0611_206-616").Range("A" & II - 1 & ":E" & II + KK)
(改为):                                                                                    
ActiveChart.SetSourceData Source:=Sheets("C0611_206-616").Range("B" & II - 1 & ":E" & II + KK)
再把图表类型改为没有成交量的就OK了。

其它的问题我一时说不清,按你的提议不好做。
随机数的函数是rand(),比如你想取1到100的随机数就这样用:=rand()*100

做这个不难,多看EXCEL里的帮助就行。
金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

 楼主| 发表于 2006-6-19 21:55 | 显示全部楼层
第4个问题:
     一般用的时候都是用历史真实数据的,怎么会用随机产生的数据呢?
还不如直接产生1和0,
像抛硬币这样的游戏,你认为可以赢吗?别人抛你押,或电脑抛。
金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

 楼主| 发表于 2006-6-19 22:14 | 显示全部楼层
第1个问题:
象你图中那样只要把这句话删了就行。
ActiveSheet.ChartObjects("图表 1").Activate
金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

发表于 2006-6-20 01:16 | 显示全部楼层
如果不能使用随机函数来测试自己的交易系统的资金管理,那么又何必使用Excel来模拟行情呢?假如只是模拟过去的数据,那么无论是使用分析家或者飞狐、GET都可以做到的。

只是使用股票软件只能用过去真实的数据来测试,对于单纯的测试资金或者头寸调整可能要有一些影响;二是这些软件的资金管理测试的功能都不行。而我前期下过一个专门搞交易系统的国外股票软件(在咱们论坛下的),但是汉化的不完全,我不会用就删除了。

当然,我知道要实现我想要的功能是很麻烦的,可能需要专门编程来解决。那样的话可能还不如学习现成的软件更好了,所以也可能是得不偿失的工作吧。
金币:
奖励:
热心:
注册时间:
2001-12-4

回复 使用道具 举报

发表于 2006-6-20 11:37 | 显示全部楼层
LZ,你一定是Excel的高手.想请教个问题,我要把数据转到Excel的形式,可是提醒说缺一个脚本,我想重新安装一个Excel,不知哪里能下载,怎样安装,谢谢!
金币:
奖励:
热心:
注册时间:
2005-3-10

回复 使用道具 举报

 楼主| 发表于 2006-6-20 21:22 | 显示全部楼层
原帖由 盾牌 于 2006-6-20 11:37 发表
LZ,你一定是Excel的高手.想请教个问题,我要把数据转到Excel的形式,可是提醒说缺一个脚本,我想重新安装一个Excel,不知哪里能下载,怎样安装,谢谢!


一般TXT的都可以转到EXCEL呀。
用BT或电驴下载,EXCEL到处都有。说不定我们论坛就有。
多用搜索引擎。
金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

 楼主| 发表于 2006-6-20 22:00 | 显示全部楼层
原帖由 eikc 于 2006-6-20 01:16 发表
如果不能使用随机函数来测试自己的交易系统的资金管理,那么又何必使用Excel来模拟行情呢?假如只是模拟过去的数据,那么无论是使用分析家或者飞狐、GET都可以做到的。

只是使用股票软件只能用过去真实的数据来 ...

这只是个最简单的程序。
我认为EXCEL是很强大的,只有想不到没有做不到的。
我用EXCEL来做交易系统的,同时做检验和统计。
就是检验一下交易的理念是否正确。
下面举个例子。
这是个WT93-99的交易结果:
——————————————————————————————————————————
交易时间长度(日):                908
规则:        一点多少钱:        10
        一个合约的手续费:        10
最小投资额:                6688
总净盈利:                68595.75
总盈利率(总盈利额/投资额):                11.88841956
总亏损率(总亏损额/投资额):                -1.63187799
利润系数(总盈利额/总亏损额):                -7.285115448
总交易次数:                68
        盈利次数:        38
        亏损次数:        30
胜率:                55.88235294
最大连赢次数:                8
最大连亏次数:                8
最大连赢金额:                21017.5
最大连亏金额:                -3344
平均盈亏比率:                -5.751406933
        平均盈利额:        2092.361842
        平均亏损额:        -363.8
投资利润率%:                1025.654157
年复利率%:                95.7941086
多头               
多头交易次数:                26
多头        盈利次数:       
        亏损次数:       
        胜率%:       
空头               
空头交易次数:               
        盈利次数:       
        亏损次数:       
        胜率%:       
——————————————————————————————————————————
这个程序有600多行,虽然只是比较初级的研究,放里共享还是有些不方便,有很多地方还要完善和改进。
金币:
奖励:
热心:
注册时间:
2005-4-23

回复 使用道具 举报

发表于 2006-6-20 23:52 | 显示全部楼层
类似的东西我也做过,即交易系统的测试。但是由于工具所限(我不会编程,对Excel也不熟悉),所以只能用飞狐来作一些简单的指标测试。如果贴主能够将这些东西发上来共享真是太好了。当然,如果觉得不完善,可以小范围地公布给一些编程高手来共同完善岂不更好?!
金币:
奖励:
热心:
注册时间:
2001-12-4

回复 使用道具 举报

发表于 2006-6-21 15:36 | 显示全部楼层
谢谢LZ.
金币:
奖励:
热心:
注册时间:
2005-3-10

回复 使用道具 举报

发表于 2006-6-22 00:34 | 显示全部楼层
不错!谢谢
金币:
奖励:
热心:
注册时间:
2005-4-29

回复 使用道具 举报

发表于 2006-7-14 12:17 | 显示全部楼层
谢谢,学习了!
金币:
奖励:
热心:
注册时间:
2005-2-12

回复 使用道具 举报

发表于 2006-7-20 22:09 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
金币:
奖励:
热心:
注册时间:
2003-3-11

回复 使用道具 举报

发表于 2006-7-21 00:35 | 显示全部楼层
又见高手,呵呵
金币:
奖励:
热心:
注册时间:
2005-9-19

回复 使用道具 举报

发表于 2006-7-21 04:42 | 显示全部楼层
dddd
金币:
奖励:
热心:
注册时间:
2004-11-7

回复 使用道具 举报

发表于 2006-7-21 13:54 | 显示全部楼层
强烈支持
金币:
奖励:
热心:
注册时间:
2005-9-29

回复 使用道具 举报

签到天数: 1 天

发表于 2006-7-21 14:46 | 显示全部楼层
分析家的数据如何搞到这里面去?要手工输入吗?太麻烦了吧。希望楼主详述过程
金币:
奖励:
热心:
注册时间:
2004-5-9

回复 使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

本站声明:1、本站所有广告均与MACD无关;2、MACD仅提供交流平台,网友发布信息非MACD观点与意思表达,因网友发布的信息造成任何后果,均与MACD无关。
MACD金融网(1997-2016)官方域名:macd.cn   MACD金融网校(2006-2016)官方域名:macdwx.com
值班热线[9:00—18:00]:020-85551719   24小时网站应急电话:18292674919
找回密码、投诉QQ:89918815 友情链接QQ:95008905 广告商务联系QQ:17017506 电话:18292674919
ICP证: 粤ICP备05022117 中华人民共和国增值电信业务经营许可证:粤B2-20070280 茂名市网警备案编号: 4409023010508
安全联盟

粤公网安备 44010602000651号

举报|Archiver|手机版|MACD股票论坛 ( 粤ICP备05022117

GMT+8, 2018-2-25 23:50 , Processed in 0.055148 second(s), 8 queries , MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表