说起彩票，大家都不陌生！众多的彩票网站、工具层出不穷，各种数据分析比比皆是，但大多千篇一律。今天就给大家分享一下个人用Excel构建彩票推选工具的思路。（仅限于Excel深入交流学习，请勿作为其他用途）
基本框架运行情况
一、工具及载体
本表格基于Excel2016制作，涉及VBA代码，查询（VLOOKUP）、排序（RANK）、统计（COUNTIFS）、日期函数以及网络查询。
二、主体框架介绍
本系统主要利用大量的机选数据结合开奖情况及设置特殊值等进行计算，最终选取一注概率最低的进行推送。主要界面如下图。
（一）机选部分。利用VBA代码随机生成30000注彩票，降低整个表格运行内存，提升运行速度。
机选部分代码截图，含格式设置
（二）主体界面部分。包含机选概率计算，一键刷新、推选、时间、获取网络数据部分。
主界面部分
- 刷新按钮。主要是利用F9的重算功能，对公式进行固定10次刷新，解决每次打开运行时VBA运行结果重复问题。涉及代码如下
Private Sub CommandButton2_Click()
Calculate
ActiveWorkbook.Save
End Sub
2. 机选概率计算。利用COUNTIFS和RANK函数组合生成计算概率。以K2单元格为例。篮球参照。
具体公式可私信联系获取整套表格
3. 辅助表格。用于红球1-35及篮球1-12数字唯一值排序及推选查询。这个概率排序是综合机选30000注+日期数字+近5期开奖情况进行综合计算按出现概率由低到高进行排序的。
4. 网络数据查询部分。利用Excel查询网络数据功能，直接将网络数据导入电子表，并实现网络动态更新。
查询网络数据情况显示（30期）
查询网站
VLOOKUP匹配最低概率前5位
三、小结
根据上述框架，基本能够实现各类彩票工具的推选制作，还可根据需求，增加大小、奇偶等一系列的条件限制，最终计算出一注符合个人想法的彩票。各位大神有更多更好建议的，可以多多交流分享一下，仅此表格作为网络查询与多函数叠加使用的练习，请勿用于非法用途。如需获取原表格，请私信回复“210904”或“彩票”。如有不妥之处，敬请各位批评指正。
