使用VBA宏可快速将Excel工作簿的每个工作表保存为独立文件，操作步骤包括打开VBA编辑器、插入代码并运行；对于少量工作表，可通过右键“移动或复制”创建副本并另存为新文件；若数据为主，可用Power Query加载各表并导出到Excel文件。
如果您需要将一个Excel工作簿中的多个工作表分别保存为独立的文件，以便于分发或归档，可以通过以下方法实现。这些操作能够帮助您快速完成拆分任务。
本文运行环境：Dell XPS 13，Windows 11
一、使用VBA宏代码自动拆分工作表
VBA（Visual Basic for Applications）是Excel中强大的自动化工具，通过编写一段简单的宏代码，可以将当前工作簿中的每个工作表导出为单独的Excel文件。
1、打开需要拆分的工作簿，按下 Alt + F11 打开VBA编辑器。
2、在“插入”菜单中选择“模块”，然后粘贴以下代码：
Sub SplitSheetsToFiles()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Copy
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\" & ws.Name & ".xlsx"
ActiveWorkbook.Close False
Next ws
End Sub
3、关闭VBA编辑器，返回Excel，点击“开发工具”选项卡中的“宏”，选择“SplitSheetsToFiles”，点击“运行”即可开始拆分。
二、手动复制工作表并另存为新文件
对于工作表数量较少的情况，手动操作更为直观且无需编程基础。该方法通过复制工作表到新工作簿并单独保存来实现拆分。
1、右键点击底部的工作表标签，选择“移动或复制”。
2、在弹出的窗口中勾选“建立副本”，然后在“将选定工作表移至工作簿”下拉框中选择“新工作簿”。
3、点击“确定”后，系统会创建一个新的工作簿，其中仅包含所选工作表。
4、在新工作簿中点击“文件”→“另存为”，选择保存位置和文件名，点击“保存”完成单个文件的导出。
5、重复上述步骤，处理其余工作表。
三、使用Power Query批量导出数据
Power Query适用于以数据表为主的Sheet拆分场景，可将各工作表的数据加载到查询中，并通过高级功能导出为独立文件。
1、点击“数据”选项卡，选择“获取数据”→“启动Power Query编辑器”。
2、在Power Query中依次添加当前工作簿中的各个工作表作为数据源。
3、对每个查询进行配置，确保仅加载所需数据范围。
4、右键每个查询，选择“转换”→“连接查询”→“输出到文件”→“Excel”。
5、设置输出路径和文件命名规则，确认后系统将自动生成对应文件。
