Excel如何批量导出工作簿sheet为独立工作表

1、Excel下面有多个sheet工作簿，要将其以sheet表名称导出为Excel.xlsx表格。

2、打开，开发工具——VBA编辑器。

3、在窗口左侧，插入新的模块，如下图。

4、在模块编辑器中输入代码：Sub 批量导出工作簿()Application.ScreenUpdating = 僻棍募暖FalseFor Each sht In Sheetssht.CopyActiveWorkbook.SaveAs "C:\Users\Administrator\Desktop\新建文件夹 (3)\" & sht.NameActiveWorkbook.CloseNextApplication.ScreenUpdating = TrueEnd Sub可复制代码。

5、然后点击运行，运行该段VBA代码。

6、最后，原Excel下的工作表格，全部都导出来了。