如何将Excel中有N个(非常多)工作表，如何把每个工作表都导出为单独的文件，并用工作表名命名导出文件？（excel工作

1.Alt+F11进入VBE 2.菜单：插入-模块。 3.复制下面的代码到光标处 4.Alt+F11回到Excel 5.Alt+F8选Test,点击运行 '将工作簿所有工作表另存为单独的文件。 '路径为原工作簿路径，文件名为工作表名 SubTest() DimShtAsWorksheet ForEachShtInSheets Sht.Copy ActiveWorkbook.SaveAsThisWorkbook.Path&"\"&Sht.Name&".xls" ActiveWorkbook.Close Next EndSub