按指定条件拆分工作表数据成工作簿，新工作簿还需保留一个工作表

爱橘子的猫 · 发表于 2023-2-8 21:38

领导给了一份数据表，要按城市拆分成单独的工作表并命名，因为需要单独发给客户嘛，并且需要保留里面一个计算表，自己快拆分吐了

VB求助：将此工作表内容按相同城市名称拆分成单独工作薄；

1、新工作簿名称以B列城市命名；

2、如新工作簿名称为【南京】，“目标文件”工作表内只有南京的所有信息，其他不需要，并保留标题行；

3、新工作薄还需要保留“计算文件”这个工作表。

最终成型：如【南京】工作簿中，有两个工作表，一个“目标文件”里面只有南京的数据，一个“计算文件”工作表。

【考虑情况：城市排序不一定是相同名字在一起，有可能穿插】

【如有表述不清，附件有示例模样】。

万事胜① · 发表于 2023-2-8 22:41

按指定条件拆分成工作簿.zip (57.56 KB, 下载次数: 10)

shiruiqiang · 发表于 2023-2-8 22:41

---------新手根据论坛老师写的，不包售后---------

第二张表的名字自己改一下吧

gwjkkkkk · 发表于 2023-2-8 22:46

请解压后使用...

爱橘子的猫 · 发表于 2023-2-9 08:22

gwjkkkkk 发表于 2023-2-8 22:46
请解压后使用...

感谢老师这么晚了还在为我的帖子写代码，给你小心心，昨天太晚了没有下载测试，今天测试一下非常好用，还贴心的把后面的表格进行了数据处理，送你小花花

爱橘子的猫 · 发表于 2023-2-9 08:24

shiruiqiang 发表于 2023-2-8 22:41
---------新手根据论坛老师写的，不包售后---------

第二张表的名字自己改一下吧

感谢老师的帮助，非常感谢，附件下载了学习一下。

爱橘子的猫 · 发表于 2023-2-9 08:25

万事胜① 发表于 2023-2-8 22:41

感谢老师的帮助，测试好用，感谢您的付出。

ykcbf1100 · 发表于 2023-2-9 09:11

参与一下。

筛选法拆分。

爱橘子的猫 · 发表于 2023-2-9 13:14

gwjkkkkk 发表于 2023-2-8 22:46
请解压后使用...

老师你好，如果新生成的工作簿需要保留里面的宏模块怎么改代码，新生成的工作簿里面会把模块都去掉

爱橘子的猫 · 发表于 2023-2-9 13:14

ykcbf1100 发表于 2023-2-9 09:11
参与一下。

筛选法拆分。

感谢老师，老师你好，如果新生成的工作簿需要保留里面的宏模块怎么改代码，新生成的工作簿里面会把模块都去掉

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

按指定条件拆分工作表数据成工作簿，新工作簿还需保留一个工作表

评分

评分

评分