<132>把一个工作表按行拆分为若干张工作表，并以行首单元格命名（同一个工作簿内），会计也要写代码

分久必合，合久必分。

excel的使用中，使用频率最高而且让我们最头疼的操作不是合并就是拆分，不是拆分就是合并。刘老师收到的频率最高的提问不是合并就是拆分，不是拆分就是合并，本公众号陆续介绍过使用函数或菜单来合并的方法，比如：

但是，要论快速和省事，当然莫属使用VBA代码了，一键就可以完成合并和拆分，接下来几周，我打算做个拆分和合并的VBA代码集合：

拆分文件（蓝色字体为链接，直接点击可以跳转文章）

3、把一个工作表按筛选结果拆分为若干张工作表（同一个工作簿内）

5、把一个工作表按行拆分为若干张工作表，并以行首单元格命名（同一个工作簿内）

合并文件：

1、同一个文件夹内的若干个工作簿合并到一个工作簿（放在若干个工作表内）

2、同一个工作簿内的若干张工作表合并到一个工作表内（上下结构），比如3个车间工人的3张工资表合并成1张工资表。

3、同一个工作簿内的若干张工作表合并到一个工作表内（左右结构），比如，放在若干张工作表内的若干年资产负债表合并成1张汇总表。

今天发布的视频和代码是：把一个工作表按行拆分为若干张工作表，并以行首单元格命名（同一个工作簿内）

代码如下，复制粘贴到模块里就可以了。

‍