Excek中如何按筛选值自动生成一系列新的工作簿（表）？

handy421

文件夹1下有工作薄1个，该工作簿下面有三张工作表：甲、乙、丙公司合同登记表。

工作簿原始数据

平时，每隔一段时间需要做的事情是：将甲公司合同登记表中的一列（如项目负责人）的所有人（包括：张三、李四、王五、赵六……）等每人负责的项目情况筛选一遍，逐个copy出来，逐个新建项目负责人工作表，如甲公司合同登记表项目负责人张三.xlsx、甲公司合同登记表项目负责人李四.xlsx……筛选复制粘贴形成的新表样式（各列的名称）与合同登记表一致，见下表：



然后，继续筛选乙公司合同登记表中的项目负责人，再逐个新建项目负责人的表格，如乙公司合同登记表项目负责人张三.xlsx、乙公司合同登记表项目负责人李四.xlsx。
再继续丙公司合同登记表中相同的操作。

最终文件夹中工作簿是类似下面这样的工作簿：

最终形成的工作簿

最后，将甲公司合同登记表项目负责人张三.xlsx、乙公司合同登记表项目负责人张三.xlsx、丙公司合同登记表项目负责人张三.xlsx 3张表格发给张三本人；再将甲公司合同登记表项目负责人李四.xlsx、乙公司合同登记表项目负责人李四.xlsx、丙公司合同登记表项目负责人李四.xlsx 3张表发给李四本人……依次类推。


因为经常要重复上述操作，每次用筛选——复制——新建工作簿——粘贴——命名并保存新工作簿，也能完成，但数据量有些大，也太不智能化，长期重复操作，不是个好解决方法。
请教各位大神，有什么好的解决办法？具体如何操作呢？
或者有类似的视频讲解推荐一下也行。
不胜感激！

laomu2010

数据透视表拆分

沈默00

这个VBA可以解决，
你没有附件，我也帮不了你...

zpy2

https://club.excelhome.net/forum.php?mod=viewthread&tid=1520437&mobile=
共享表格？

3190496160

vba可以解决，前提是上传你的excel附件

handy421

非常感谢您！
能不能发个完整的操作视频录像给我学习一下36323256@qq.com，不胜感激！