excel+vba 湖南省高考生志愿填报参考

zhengqiren · 发表于 2024-7-7 10:52

适用于湖南省高考生志愿填报参考用。链接: https://pan.baidu.com/s/1KVdFGCYROcJWNTLFpZH72Q?pwd=xjxb 提取码: xjxb

zhengqiren · 发表于 2025-6-16 20:53

本帖最后由 zhengqiren 于 2025-6-16 20:55 编辑

今天更新了一下文件，有需要请下载：
更新内容：
1. 在省份那里选择加入了空白选项，以免第一次查询选了省份，后续查询全部强制要选省份。
2. 选取学校省份和不选取学校省份时增加了判断，以免数据出错。
3. 有些学校后面跟的有括号，括号内是校区，这样在院校数据库工作表中直接取学校省份取不出来，只能取括号前面的校名。
所以用left函数取值判断。
***感谢网友瘦马SoMe找出来的bug。
***大家一起学习，共同进步！
目前表里的2025年一分一段表是模拟的，大家等网上新的一分一段表出来放进去就可以了（此表仅对湖南考生适用）。

xgczwp · 发表于 2025-5-19 16:12

提示运行错误“9”，下标越界。
drr = Sheets(Year(Date) & "年一分一段" & CHKkm).UsedRange '*

侃遍天下无二人 · 发表于 2024-7-7 15:39

很久没见vb6的程序了

666888tzq · 发表于 2024-7-7 17:45

高手，厉害。

能自己改成其他省份的不？

zhengqiren · 发表于 2024-7-7 19:43

可以。把本省的一分一段表和投档线表替换到原来的表中，注意的表头格式不要变化，以及表的名称不要乱改动就可以了。

shm382 · 发表于 2024-7-7 20:33

弄一份广东的呗，谢谢！

ZHOUJIAN75 · 发表于 2024-7-7 21:14

支持一下，毕竟小孩明年才高考，但还是广西的，自己弄一下看看搞得广西就OK了。

martin313 · 发表于 2024-7-7 21:38

今年的高考志愿早已经填报结束了

189678 · 发表于 2024-7-7 23:26

值得一试

kuyzar · 发表于 2024-7-7 23:57

今年的结束了，收藏明年再使用。

xiaobaixuepj · 发表于 2024-7-8 06:16

感谢分享，收藏

帐号		自动登录	找回密码
密码			注册[Register]

[其他原创] excel+vba 湖南省高考生志愿填报参考

免费评分