如何将EXCEL中的工作表批量转换成独立的工作簿，VBA高效便捷的方法

有时候我们需要将一个工作簿中的工作表单独导出成独立的工作簿，简称Worksheet to Workbook哈哈哈。
那么，如果一个个移动复制会非常繁琐和不便。此时只需要一段代码即可完成，代码在文末，先上教程！

一、使用教程

1、如图，点击开发工具-插入-命令按钮。

2、在任意空白区域画出一个框，画出的框叫做commandbutton（命令按钮）。

3、双击commandbutton（命令按钮），会出现如下窗口，在箭头所指的圈处填入“代码”（代码见文末）。

4、如图将代码粘贴到指定的位置即可。

5、保存关闭后，再次点击设计模式，就退出设计模式。

6、然后，点击commandbutton（命令按钮），会跳出新的窗口，让你选择文件夹，这个文件夹就是你转换后工作簿保存的路径，选择好后点击确定

7、等待一两秒，提示处理完成，此时当前工作簿中的三个工作表“工作表1”、“阿尔法凡”、“阿尔法凡EXCEL”已经被转换成独立的工作簿了，如图。

二、转换代码