自动将同一个Excel文件中的多个表单独另存为多个独立文件
在某些情况下，我们需要把工作簿中的每个工作表单独另外存为一个Excel文件，并以该工作表的名称作为文件名。
当工作表数量比较多的时候，我们手动保存的效率就会显得相当慢了，下面给大家分享一个快速的方法。
Excel文件自动拆分成多个文件
1. 查看案例
下方为我们这次用来讲解的案例，我们需要做的是把Excel文件中的所有工作表单独保存为独立的Excel文件，并以工作表的名称命名文件。
在开发工具里找到代码编辑器按钮，点击即可进入
3. 粘贴下方代码到代码编辑器里
Sub 工作表另存为()
Dim sht As Worksheet
Dim MyBook As Workbook
Set MyBook = ActiveWorkbook
For Each sht In MyBook.Sheets
sht.Copy
ActiveWorkbook.SaveAs Filename:=MyBook.Path & “\” & sht.Name, FileFormat:=xlOpenXMLWorkbook ‘将工作簿另存为xlsx格式
ActiveWorkbook.Close
Next
MsgBox “文件已经被分拆完毕!”
End Sub
4. 运行代码
点击如下图所示的绿色三角按钮
5. 运行宏
在弹出的宏窗口中点击运行按钮
6. 查看结果
查看原文件所在的文件夹，我们会发现文件夹中出现了其他以各自工作表名称命名的Excel文件
版权声明：本文内容由互联网用户自发贡献，该文观点仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容，请发送邮件与管理举报，一经查实，本站将立刻删除。
赞 (0)
相关推荐
excel教你做表格，真的很全，一张一个动图教程，简单易学
教你做表格（史上最全）难得的excel教程集珍藏版，简单明了，包你学会，欢迎转载照片名称：自动筛选照片名称：在Excel中字符替换照片名称：在Excel中直接编辑“宏”照片名称：在Excel中为导入外部数据照片名称：在Excel中行列快速转…Excel教程：在excel中奇偶行的提取与筛选方法
今天给大家分享一个在excel中奇偶行的提取与筛选的方法。第一、excel偶数行提取图1如下图所示，将A列的偶数行数据提取出来。思路：excel偶数行就是2、4、6、8这样的序列，为了公式下拉能自动生成这样的偶数，所以用：ROW(A1)*2…excel单元格英文字母序列自动填充实用技巧
平时的excel应用中，我们经常要生成有序的序列，或者说是编号。不过，大家最熟悉的应用应该是数字序列吧。想要生成数字序列，只要在输入第一个数字后，按住ctrl键，鼠标下拉填充，数字序列就顺序生成了。但是，如果想要在Excel里生成字母序列，…Excel技巧：用VLOOKUP函数制作产品报价单，自动生成价格！
今天，教大家给大家分享一个用VLOOKUP函数制作产品报价单，自动生成价格的小技巧，输入对应的产品编号，就能够自动生成价格和日期，录入数量后能生成金额。1、准备工作Sheet1中是报价单表格，大家可以根据自己需求来制作。Sheet2中存放所…Excel小技巧：快速生成表格目录
使用Excel做数据处理时，很多情况下，都会在同一个Excel文件中放置多个工作表，而为了能快速的跳转到相应表格查看数据，通常我们会做带超链接功能的目录，方便跳转。通常一个Excel文件中的工作表数量都不少，如果逐个添加超链接，那么太浪费时…Excel教程：如何将同类项合并放到一个单元格内？
小伙伴们，秋天已经到来，最近怎么样?今天小编为大家分享一个Excel小技巧，如何将同类项合并放到一个单元格内。比如，如下表格，要将同地区的姓名汇总合并放在同一个单元格内，且姓名间用顿号隔开。那么，你觉得怎么做比较快?Powerquery是合…摄影技巧：照片怎么拍才好看？摄影角度+方向+案例分析？干货分享
有拍摄经验的小伙伴都知道，拍摄不可能永远站在同一个角度和方向拍摄，为了让片子更加饱满生动，我们必须调整自己所站位置和角度，对主体进行多方位地“膜拜”，趴地爬树等技巧不在话下。今天就来讲讲摄影中的拍摄方向、角度以及案例分析。一、什么是拍摄方向…Excel制作进销存表，2个提升自动化小细节1、库存预警2、出库数量不能小于库存
如下所示，是制作的一个简易进销存表格，在左边记录物品的出入库流水情况物品需要手动的添加，后面的入库，出库，库存计算设置好了公式，它会自动的更新其中H2输入的公式是：=SUMIFS(D:D,B:B,G2,C:C,H$1)I2输入的公式是：=S…Excel公式：如何单独打印表格指定区域?
一份Excel表格里面有很多内容，现在只需要打印表格中的一部分内容。之前看过有些同学的做法是将需要打印的那部分内容先复制到另外一张工作表里，然后再打印出来。其实不用这么麻烦，教你一个简单的办法。操作方法：1、在打印之前，先用鼠标选定需要打印…追随内心做自己的名言，致自己的80条人生感悟句
1、时间，让深的东西越来越深，让浅的东西越来越浅。2、在这个世界上，我最珍贵的财产就是你的心。3、人生中最永恒的幸福就是平凡，最长久的拥有需懂得珍惜。4、真的，理想的伴侣要补足对方的缺点，而不是互犯同一个缺点。5、人生不是要按别人的想法去过…
