Excel：将所有工作表保存或导出为单独的CSV或文本文件（2种简单方法） Author Siluvia • Last modified 2025-08-22 在数据分析、报告和信息共享的世界中，Microsoft Excel 通常用于管理包含多个工作表的工作簿。经常会出现需要将每个工作表单独保存或导出为独立的 CSV（逗号分隔值）或文本文件（.txt）的情况。这种需求很常见，无论是为了与同事共享数据、导入其他数据库或软件应用程序、系统集成，还是为了合规性或备份而归档单个数据集。然而，Excel 当前并未提供将所有工作表一次性导出为单独文件的原生功能，使得重复手动另存为的过程变得有些繁琐。
本文将指导您通过实用且高效的方法，自动化地将所有（或选定的）Excel 工作表导出或转换为单独的 CSV 或文本文件，确保您的工作流程保持顺畅且无错误。
💡 快速导航： ➤ 使用 VBA 代码将所有工作表保存或导出为 CSV 或文本文件 ➤ 使用 Kutools for Excel 保存或导出所有/特定工作表 使用 VBA 代码将所有工作表保存或导出为 CSV 或文本文件尽管 Excel 没有提供批量导出所有工作表为单独 CSV 或文本文件的内置功能，但您可以使用 VBA 代码来自动化此过程。此解决方案特别适用于熟悉基本脚本的用户，或者需要对导出过程进行更多控制的人，例如指定文件位置或自定义文件命名。以下 VBA 脚本能够自动将工作簿中的每个工作表导出为其各自的文件。
导出或转换所有工作表为单独的 CSV 文件
1. 同时按下 Alt + F11 键打开 Microsoft Visual Basic for Applications (VBA) 编辑器。如果您的 Excel 没有显示“开发工具”选项卡，仍然可以使用此快捷方式访问 VBA 环境。
2. 在 Microsoft Visual Basic for Applications 窗口中，点击菜单中的 插入 > 模块。这将在其中创建一个新模块以输入脚本。接下来，将以下 VBA 代码复制并粘贴到新建的窗口中：
Sub ExportSheetsToCSV()
Dim xWs As Worksheet
Dim xcsvFile As String
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.Copy
xcsvFile = CurDir & "\" & xWs.Name & ".csv"
Application.ActiveWorkbook.SaveAs Filename: = xcsvFile, _
FileFormat: = xlCSV, CreateBackup: = False
Application.ActiveWorkbook.Saved = True
Application.ActiveWorkbook.Close
Next
End Sub3. 要运行代码，请按 F5 键或点击工具栏中的“运行”按钮。执行后，您会发现每个工作表都已导出为单独的 CSV 文件，并存储在您的“文档”文件夹中。每个文件都会根据各自的工作表名称自动命名，从而简化了导出数据的组织过程。请参见下面的截图示例：
注意事项：根据工作簿大小和工作表数量，导出过程可能需要几秒钟。在运行任何 VBA 宏之前，请先保存您的工作簿，以避免意外数据丢失。如果需要，在导出之前确保将工作表中的公式转换为值，因为 CSV/文本格式仅保存值，不保存公式。
导出或转换所有工作表为单独的文本文件
以下 VBA 代码允许您将工作簿中的每个工作表导出为独立的文本 (.txt) 文件。当需要在其他系统或平台上导入或处理纯文本文件时，这是非常有益的。
Sub ExportSheetsToText()
Dim xWs As Worksheet
Dim xTextFile As String
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.Copy
xTextFile = CurDir & "\" & xWs.Name & ".txt"
Application.ActiveWorkbook.SaveAs Filename: = xTextFile, FileFormat: = xlText
Application.ActiveWorkbook.Saved = True
Application.ActiveWorkbook.Close
Next
End Sub与 CSV 导出类似，生成的文本文件将保存在您的“文档”文件夹中，每个文件都将根据其来源的工作表名称自动命名。请参见下面的截图示例。
重要注意事项：在导出为文本时，除非代码另行指定，否则 Excel 将使用默认分隔符（通常是制表符）。检查导出的文件是否格式正确，特别是当您的数据包含逗号、换行符或特殊字符时。在运行脚本之前，请先保存您的工作簿，并注意如果导出文件夹中已存在同名文件，则可能发生文件覆盖。
VBA 方法的优点和局限性：VBA 方法适合于自动化的重复导出，或者当您需要自定义脚本时（例如，导出到用户选择的文件夹或处理特定文件格式）。但是，它需要启用宏，由于安全策略，某些企业环境中可能会限制此操作。如果您的工作簿包含敏感数据或禁用了宏，请考虑以下描述的替代方案。
故障排除：如果宏未能按预期导出文件，请确保：
在运行宏之前保存工作簿，以防止意外关闭或错误。 您具有写入“文档”文件夹的权限（或者修改代码以指定其他位置）。 所有工作表名称均为有效的 Windows 文件名。工作表名称中的 /、\、: 等字符可能导致文件创建错误。 Excel 中的宏安全设置允许您运行 VBA 代码。如果出现提示，请启用宏。 使用 Kutools for Excel 保存或导出所有/特定工作表为 CSV 或文本文件对于寻求无需编写或运行 VBA 脚本的便捷解决方案的用户，Kutools for Excel 提供了一种直观且简化的导出方法，只需几次点击即可将所有或部分工作表导出为单独的 CSV、文本或其他文件格式。这种方法适用于所有熟练程度的用户，包括那些不想接触代码或需要频繁快速批量导出功能的人。
Kutools for Excel 提供了超过 300 种高级功能，简化复杂任务，提升创造力与效率。 通过集成 AI 能力，Kutools 能够精准自动执行任务，让数据管理变得轻松简单。Kutools for Excel 的详细信息... 免费试用...1. 导航至 Excel 功能区并点击 Kutools Plus > 工作簿 > 分割工作簿。这将启动批量导出界面。请参见下面的截图：
2. 在“分割工作簿”对话框中，您会看到所有列出的工作表名称及其复选框：
1). 若要导出所有工作表，请保持“工作表名称”部分中的所有项目选中。如果您只想导出某些工作表，请取消选中要排除的工作表。 2). 在“选项”区域中，启用“指定保存格式”下拉菜单并选择 Unicode 文本 (*.txt) 或 CSV (Macintosh)(*.csv) 作为您选择的文件格式。选择适当的格式可以无缝导入大多数主要数据库、其他电子表格程序或文本编辑器中。 3). 完成选择后，点击“分割”按钮继续。
3. 当“浏览文件夹”对话框提示时，选择要保存导出文件的文件夹。点击“确定”开始导出。请注意目标目录，以确保轻松访问您的导出文档。
Kutools 将立即处理您的选择，将所有或选定的工作表保存为指定位置中的单独 CSV 或文本文件。文件命名是自动的，并与工作表名称匹配。这对于轻松组织和跟踪数据导出尤其有用。
为什么要使用 Kutools for Excel？ 与手动导出或使用 VBA 宏相比，Kutools for Excel 为个人用户和组织提供了独特的优势：
⚡ 批量导出，省时省力 – 高效导出所有或选定工作表，用几秒钟完成原生 Excel 或手动处理可能需要更长时间的任务。 📁 多样化的输出选择 – 支持多种格式，如 CSV、TXT、PDF、XLSX 和 XLS，使您的导出兼容各种平台和业务需求。 🔍 灵活选择工作表 – 能够包含或排除隐藏和空工作表，保持导出内容简洁并专注于相关数据。 🧾 清晰的文件命名 – 默认情况下，每个输出文件使用其工作表名称，有助于避免混淆并减少导出后的重命名。 🧩 无需脚本知识 – 整个过程完全图形化且易于访问，无论技术背景如何，任何人都可以导出数据。 演示：使用 Kutools for Excel 保存、导出或转换多个/所有工作表为 CSV 或文本文件 Kutools for Excel：超过 300 种实用工具触手可及！永久免费享受 AI 功能！立即下载！最佳Office办公效率工具 🤖 Kutools AI 助手：以智能执行为基础，彻底革新数据分析 |代码生成 |自定义公式创建|数据分析与图表生成 |调用Kutools函数…… 热门功能：查找、选中项的背景色或标记重复项 | 删除空行 | 合并列或单元格且不丢失数据 | 四舍五入…… 高级LOOKUP：多条件VLookup|多值VLookup|多表查找|模糊查找…… 高级下拉列表：快速创建下拉列表 |依赖下拉列表 | 多选下拉列表…… 列管理器： 添加指定数量的列 | 移动列 | 切换隐藏列的可见状态 | 比较区域与列…… 特色功能：网格聚焦 |设计视图 | 增强编辑栏 | 工作簿及工作表管理器 | 资源库（自动文本） | 日期提取 | 合并数据 | 加密/解密单元格 | 按名单发送电子邮件 | 超级筛选 | 特殊筛选（筛选粗体/倾斜/删除线等）…… 15大工具集：12项 文本工具（添加文本、删除特定字符等）|50+种 图表 类型（甘特图等）|40+实用 公式（基于生日计算年龄等）|19项 插入工具（插入二维码、从路径插入图片等）|12项 转换工具（小写金额转大写、汇率转换等）|7项 合并与分割工具（高级合并行、分割单元格等）| …… Kutools支持多种语言——可选择英语、西班牙语、德语、法语、中文等40多种语言！通过Kutools for Excel提升您的Excel技能，体验前所未有的高效办公。 Kutools for Excel提供300多项高级功能，助您提升效率并节省时间。 点击此处获取您最需要的功能……
Kutools for Excel更多详情…… 免费下载…… Office Tab为Office带来多标签界面，让您的工作更加轻松 支持在Word、Excel、PowerPoint中进行多标签编辑与阅读。 在同一个窗口的新标签页中打开和创建多个文档，而不是分多个窗口。 可提升50%的工作效率，每天为您减少数百次鼠标点击！ Office Tab更多详情…… 免费下载……所有Kutools加载项，一键安装Kutools for Office套件包含Excel、Word、Outlook和PowerPoint的插件，以及Office Tab Pro，非常适合跨Office应用团队使用。
全能套装——Excel、Word、Outlook和PowerPoint插件+Office Tab Pro 单一安装包、单一授权——数分钟即可完成设置（支持MSI） 协同更高效——提升Office应用间的整体工作效率 30天全功能试用——无需注册，无需信用卡 超高性价比——比单独购买更实惠 Kutools for Office更多详情…… 免费下载……