相信许多朋友在利用Excel进行表格数据汇总的时候，都会碰到一个情况，那就是将一个工作簿中里面的许多个分别，单独的进行拆分为多个工作簿。
如上图所示，如果表格不多的情况下，许多朋友都会用到新建工作簿后，直接将内容复制粘贴来处理。但是如果数据量较大的情况，这种方法就会显得非常死板。今天我们就来学习一下，如何五秒快速拆分工作簿中的上百个工作表。
一：效果图演示
如上小效果图所示，我们通过vba代码的方式，快速就可以实现将广东分公司、深圳分公司、长沙分公司三个分工作表单独的拆分开来成为独立的工作簿。下面我们来讲解一下具体的操作方法：
二：操作方法
第一步：鼠标任意点击一个工作表名字上，点击右键—查看代码；或者按Alt+F11快捷键进入代码编辑窗口，如下图所示：
第二步：点击左边工程窗口，鼠标右键点击Thisworkbook，点击插入—模块。双击模块，进入我们的工作簿模块编辑窗口，如下图所示：
第三步：进入模块后，输入我们的下方这段VBA代码，然后点击上方运行—运行子过程或用户窗体，如下图所示：
通过上面的操作步骤，现在我们就可以几秒钟快速的将多个工作表单独拆分成独立的工作簿。
获取代码请私信：vba拆分代码