129-多工作表弄保存为多个Excel文件怎么弄#工作表导出#VBA

多工作表单独保存为多个Excel文件怎么弄？

今天的问题是工作簿，一个工作簿里面的所有工作表如何单独保存为若干个文件？这里假设保存的文件是在工作簿所在的目录下面，并且如果对应的名字有重复，自己加一个副本的后缀。

左边是数据，现在看下面有这样的123456，有第二个工作表，来看一下长什么样子。现在想要把它们保存为123456六个单独的工作部，加上本身自己这样的大的工作部。因为有些时候想要数据为了备份留存，这里还是用VBA方法。

·找到开发工具，点击VB，当然也可以用out加F11快捷键。

·点击之后找到刚才对应的当前所在的工作部，右键插入模块。

·这里输入代码，这里就把代码直接放到评论区了，直接复制。

·输入之后大致简单看一看，这个代码大致看一看，这个代码就是这个，前面是函数，这里就是看一下是否有重复的名字。

·最下面一段代码，有就给它加上一个副本，这个名字是指的是公众表里面有没有重复的名字，自己就把它保存好。

·这里把它运行，idf5运行或者点这个，会看到窗口在闪，在闪就表明它已经在保存了。

·它保存在当前L1-XLS文件所在的文件夹，这里已经准备好了。

·现在就是当前的文件夹，就是L1，现在有六个，除了L1之外和恰好就是六个，对应的就是这个恰好。

·随便打开一个来看一看，还有表一，看一下是不是长这样，这是表一，和表一是不是一模一样的。

这里就完成了任务了，任务完成，收工下班。