搜索
由繁至简的炒股秘籍股票配资送值得信赖我出资你炒股赚大钱自己操盘配资财源滚滚
查看: 77413|回复: 93

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

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

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

来自:MACD论坛(bbs.macd.cn) 作者:imasom 浏览:77413 回复: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-2019)官方域名:macd.cn   MACD网校(2006-2019)官方域名:macdwx.com
值班热线[9:00—17:30]:18292674919   24小时网站应急电话:18292674919
找回密码、投诉QQ:89918815 友情链接QQ:95008905 广告商务联系QQ:17017506 电话:18292674919
增值电信业务经营许可证: 陕ICP19026207号—2  陕ICP备20004035号

举报|意见反馈|Archiver|手机版|小黑屋|MACD俱乐部 ( 陕ICP备20004035号 )

GMT+8, 2024-3-29 10:13 , Processed in 0.072516 second(s), 7 queries , Redis On.

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

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