快速浏览
【
2023年3月合集】【
2023年4月合集】【
2023年5月合集】【
2023年6月合集】
内容提要
EXCEL表格拆分，可保存到Word或Excel
大家好，我是冷水泡茶，前面我们分享过，这两天我把它又优化了一下，成为一个通用版的小工具：
1、自由选择任意Excel文件；
2、自由选择工作表；
3、自由选择拆分列；
4、多种筛选方式，按日期范围，按数值（金额）范围，关键字包含，关健字排除；
5、可选择保存为Excel（默认）或Word；
6、自由选择保存路径；
7、可选“插入标题”
8、可选“没有数据也导出表格”，反之则“没有数据不导出表格”。
下面我们就一起来看一看吧：
视频演示说明
设计思路
1、关于表格拆分的功能，我们分享过好几个了，但前面的都是针对性比较强，通用性不够。
2、在最近我们分享的
Excel VBA 贷款明细数据从EXCEL表导出到WORD表中，我们扩展了一些功能，但仍然有局限性。
3、在随后的几天时间里，我一直在思考，能否做成一个通用的文件拆分工具？功能如前面内容提要里描述的那样？答案当然是可行的。
4、首先，我们插入一个用户窗体，在其上插入各种控件、按钮：
（1）选择文件，通过文件对话框获取文件路径，并将其打开（2）遍历目标文件的所有工作表，存到数组，供选择
（3）选定工作表后，读取数据，取得表头字段，作为拆分项目，同时也供选择导出列使用，这里采用动态添加控件的方式（因为我们不能确定表格都有什么字段，没法直接添加控件）
（4）日期筛选，把数据第一行是日期类型的字段列出来供选择
（5）数值筛选，把数据第一行是数字的字段列出来供选择
（6）其他筛选，把数据第一行除了日期、数值的其他字段列出来供选择
（7）保存路径，默认为拆分工具所在目录，可改变
（8）没有数据也导出文件，复选框，默认没有数据不导出表格
（8）插入标题，插入表头标题，初始状态默认没有标题，点击“插入标题”复选框，显示一个文件框供输入标题。
（9）可导出为Excel或Word文件，默认为Excel文件。5、思路看上去不是很复杂，但做起来并不容易，主要是右边三个筛选选项，不同的组合比较多，这一部分的代码量最大。6、不管怎么样，终归是成形了，一般使用应该没有问题，但不排除还会有不少BUG，有谁发现的请留言，谢谢。
主要代码还是放到第二条。
正文完
本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请
点击举报。
