全网最牛的拆分工具欢迎品鉴【在某位大侠的基础上优化的】

零下七渡 · 发表于 2020-2-26 15:05

本帖最后由零下七渡于 2020-2-27 14:30 编辑

我是VBA菜鸟，还不完善，等待大神出手再优化

功能：
1、按字段拆分为多张表格
2、按字段拆分为多个文件
3、按字段拆分为多个文件同时含多张表
4、每张表可以保留表尾
5、选择性忽视合并单元格

安装：到入窗体，添加模块放入如下代码运行

Sub 工作表及工作簿拆分()
UserForm2.Show (0)
End Sub

运行界面：

实验成功表格样例：

UserForm2.zip (7.19 KB, 下载次数: 99)

示例文件.zip (52.24 KB, 下载次数: 68)

846722556 · 发表于 2020-2-26 20:53

不能加载哟

零下七渡 · 发表于 2020-2-26 21:01

明天上传个装好的吧
可能你的是32位的系统。

闻启学 · 发表于 2020-2-27 13:05

建议不要使用合并单元格

micch · 发表于 2020-2-27 13:14

全网最牛应该是不存在的，对于不同的需求，只有订制的才是最牛的，通用的肯定有很多功能是用不上的

零下七渡 · 发表于 2020-2-27 14:31

846722556 发表于 2020-2-26 20:53
不能加载哟

原来附件上传错了搞好了

零下七渡 · 发表于 2020-2-27 14:55

micch 发表于 2020-2-27 13:14
全网最牛应该是不存在的，对于不同的需求，只有订制的才是最牛的，通用的肯定有很多功能是用不上的

这个定制的已经很多了，能力有限哈

零下七渡 · 发表于 2020-2-27 15:01

闻启学发表于 2020-2-27 13:05
建议不要使用合并单元格

不要合并单元格的拆分有时候不能满足需求
这个就是考虑有合并的情况下拆分，优化了不少，还有不足的地方。

caisl · 发表于 2020-2-27 15:13

加载错误，修改下。谢谢！

零下七渡 · 发表于 2020-2-27 17:27

caisl 发表于 2020-2-27 15:13
加载错误，修改下。谢谢！

示例文件里也有

		自动登录	找回密码
密码			免费注册

[分享] 全网最牛的拆分工具欢迎品鉴【在某位大侠的基础上优化的】