干货全拿走-用ExcelVBA做个股多模型交叉验证择时交易套利及回测系统

之前分不同的模块做了多个基于Excel的股票量化模型，具体可以看这篇文章：

https://blog.csdn.net/m0_64899365/article/details/126921893?spm=1001.2014.3001.5502

但是，但是，感觉之前用的体验不太好。具体来说就是模型虽然有，但是我如果想多个模型之前交叉验证，就需要同时打开好几个运行，太繁琐了，而且回测功能也有待优化。所以这次来了个彻彻底底的升级！之前的只能说是模块，现在的才是真真正正的系统！新系统演示可以看：

我用Excel做了一个股票多模型交叉验证择时交易套利及回测系统...._哔哩哔哩_bilibili

这边在知乎就写一些从底层逻辑开始搭建的心路历程以及部分代码吧，供学习交流。

这个软件是我原创的几个算法模型的软件化的耦合产品（之前店里已经分别上架了各个模块，但是使用的话，如果要达到交叉验证的效果需要多次运行，比较繁琐，这次在以前的基础上做了整合和优化，并添加了回测以及选股、准确性验证的模块，是一个比较完整的系统工具）。

主要利用了统计学、概率、技术指标和历史匹配的一些算法和逻辑，要理解整体的底层逻辑单看商品简介比较困难，建议去上述视频链接，查看完整视频介绍。

主要实现的功能：

1.预测大盘次日涨跌

2.预测个股次日涨跌

3.给出个股做T套利建议价格

4.自定义模块开启状态，回测策略判断的正确性

5.直观的统计结果显示

大概的决策流程图如下：

​

几个主要界面（下载界面样本可以访问：https://pan.baidu.com/s/1pE5_KujqSJZCSp4HtpuMVA 提取码：1234）：

​

​

核心的难点我感觉是不同数据之间的耦合关联，主要还是通过Excel中划分不同工作表，而在工作表中又划分不同的区，这样来操作，否则的话很容易混乱。

技术指标模型核心代码：主要为技术指标的计算，例如

For i = 0 To UBound(DateArray)

If i <=