Excel通用按列拆分成工作簿 v1.0

Excel按列拆分成工作簿的工具，网上有不少，但基本上没有做到保留原格式，如页面页边距、页眉页脚、打印相关设置、公式、批注等，拆分出来的基本上不能直接运用，如分发给别人，别人打印后不美观，且很多操作还比较复杂，标题行不能有合并单元格，不能有多行标题，这些拆分都是不人性化的，基于此我写了一个通用简单直观的代码，能解决以上问题，给不懂得编程的同志们使用，以后你只要想对Excel工作总表按组别拆分成多个工作簿，就不需要求别人了。

使用方法：

1、如下图所示，需要按H列拆分成工作簿，标题行在第三行，那么B2单元格就填写8，C2单元格要填写3。

2、选择好文件并填写好相应的行列后，请关闭需要按列拆分的Excel文件。

3、 需要注意的是如果待拆分原Excel工作簿中有多个sheet工作表，那么需要拆分的那个sheet工作表要在第一个，即调整到最前面来。

4、拆分成的工作簿在本Excel下的生成文件夹中，程序会自动打开生成文件夹，以防有的同志生成后总找不到文件在哪里。

以上请使用压缩包中“通用按某列拆分成工作簿（选择文件夹形式操作）.xlsm”这个，推荐大家使用。另外我还写了两个不一样的拆分程序，一个是直接在原文件上进行操作的，一个是复制到数据源中进行操作的，各有不同，请大家自行测试。

如果是大数据，且没有公式批注的话，用字典嵌套方式拆分可能效率高一点。