怎么把excel中的工作表导出单独保存

我又一个带VBA代码可以帮你把工作薄中的工作表保存成单个的工作薄，前提是你先备份下要保存的工作薄：
Sub xx()
Set wb = ActiveWorkbook
For i = wb.Sheets.Count To 1 Step -1
wb.Sheets(i).Move
ActiveWorkbook.SaveAs Filename:="E:\数据资料\" & "aaa" & ActiveSheet.Name
ActiveWorkbook.Close
Next
End Sub

备注：本程序将工作薄中的工作表保存成为单个的工作表，并能删除原有工作表，其中“E:\数据资料\”表示为存储路径，
“aaa"表示在原有工作表名称的基础之上添加以上字符

如果可行 请加分

选择你需要的工作表 按右键 然后选择移动工作表 点击新文件簿 然后进行存档就可以了

新建一空工作薄，把你需要的活动工作表复制粘贴过去然后保存它就可以了。