上次一个坛友求助我VBA，现在才有空搞出来！（详细版）

sleony · 发表于 2020-4-17 16:24

本帖最后由 sleony 于 2020-4-17 21:14 编辑

来个全自动的！估计是公务员，扶贫资料需要汇总分册，条件数据较多手动麻烦
第一部分是用字典筛选字段（村名），汇总去重所有村落。
第二部分（这部分是当时准备ADO。select语句表格明循环做准备）
（这部分可以去掉，在selcet 写入循环一起，减少了一层循环赋值过程）
第三部分是核心功能部分（ADO的select语句实现查询表和查询限定条件的循环）
（外层大循环是限定条件循环，内层循环是查询表的循环）
功能解释（按村名筛选出全部的各个疾病汇总表格（16个表格，1800条）的全部拆分）
（实现按村名新建工作簿，工作簿内新建指定工作表，并拆分后信息填入的过程）

jydcb003 · 发表于 2020-4-17 16:39

如果打包一下做附件就更好了

rex · 发表于 2020-4-17 16:39

上个附件更好

sleony · 发表于 2020-4-18 22:54

附件涉及隐私了，我先问下

头狼 · 发表于 2020-4-19 21:30

学习代码

阿山哥 · 发表于 2020-4-21 11:16

学习一下

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

[其他转载] 上次一个坛友求助我VBA，现在才有空搞出来！（详细版）

免费评分