Excel:将所有工作表保存或导出为单独的CSV或文本文件(2种简单方法)
在数据分析、报告和信息共享的世界中,Microsoft Excel 通常用于管理包含多个工作表的工作簿。经常会出现需要将每个工作表单独保存或导出为独立的 CSV(逗号分隔值)或文本文件(.txt)的情况。这种需求很常见,无论是为了与同事共享数据、导入其他数据库或软件应用程序、系统集成,还是为了合规性或备份而归档单个数据集。然而,Excel 当前并未提供将所有工作表一次性导出为单独文件的原生功能,使得重复手动另存为的过程变得有些繁琐。
本文将指导您通过实用且高效的方法,自动化地将所有(或选定的)Excel 工作表导出或转换为单独的 CSV 或文本文件,确保您的工作流程保持顺畅且无错误。
使用 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 Sub
3. 要运行代码,请按 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、文本或其他文件格式。这种方法适用于所有熟练程度的用户,包括那些不想接触代码或需要频繁快速批量导出功能的人。
1. 导航至 Excel 功能区并点击 Kutools Plus > 工作簿 > 分割工作簿。这将启动批量导出界面。请参见下面的截图:
2. 在“分割工作簿”对话框中,您会看到所有列出的工作表名称及其复选框:
- 1). 若要导出所有工作表,请保持“工作表名称”部分中的所有项目选中。如果您只想导出某些工作表,请取消选中要排除的工作表。
- 2). 在“选项”区域中,启用“指定保存格式”下拉菜单并选择 Unicode 文本 (*.txt) 或 CSV (Macintosh)(*.csv) 作为您选择的文件格式。选择适当的格式可以无缝导入大多数主要数据库、其他电子表格程序或文本编辑器中。
- 3). 完成选择后,点击“分割”按钮继续。
3. 当“浏览文件夹”对话框提示时,选择要保存导出文件的文件夹。点击“确定”开始导出。请注意目标目录,以确保轻松访问您的导出文档。
Kutools 将立即处理您的选择,将所有或选定的工作表保存为指定位置中的单独 CSV 或文本文件。文件命名是自动的,并与工作表名称匹配。这对于轻松组织和跟踪数据导出尤其有用。
与手动导出或使用 VBA 宏相比,Kutools for Excel 为个人用户和组织提供了独特的优势:
- ⚡ 批量导出,省时省力 – 高效导出所有或选定工作表,用几秒钟完成原生 Excel 或手动处理可能需要更长时间的任务。
- 📁 多样化的输出选择 – 支持多种格式,如 CSV、TXT、PDF、XLSX 和 XLS,使您的导出兼容各种平台和业务需求。
- 🔍 灵活选择工作表 – 能够包含或排除隐藏和空工作表,保持导出内容简洁并专注于相关数据。
- 🧾 清晰的文件命名 – 默认情况下,每个输出文件使用其工作表名称,有助于避免混淆并减少导出后的重命名。
- 🧩 无需脚本知识 – 整个过程完全图形化且易于访问,无论技术背景如何,任何人都可以导出数据。
演示:使用 Kutools for Excel 保存、导出或转换多个/所有工作表为 CSV 或文本文件
最佳Office办公效率工具
🤖 | Kutools AI 助手:以智能执行为基础,彻底革新数据分析 |代码生成 |自定义公式创建|数据分析与图表生成 |调用Kutools函数…… |
热门功能:查找、选中项的背景色或标记重复项 | 删除空行 | 合并列或单元格且不丢失数据 | 四舍五入…… | |
高级LOOKUP:多条件VLookup|多值VLookup|多表查找|模糊查找…… | |
高级下拉列表:快速创建下拉列表 |依赖下拉列表 | 多选下拉列表…… | |
列管理器: 添加指定数量的列 | 移动列 | 切换隐藏列的可见状态 | 比较区域与列…… | |
特色功能:网格聚焦 |设计视图 | 增强编辑栏 | 工作簿及工作表管理器 | 资源库(自动文本) | 日期提取 | 合并数据 | 加密/解密单元格 | 按名单发送电子邮件 | 超级筛选 | 特殊筛选(筛选粗体/倾斜/删除线等)…… | |
15大工具集:12项 文本工具(添加文本、删除特定字符等)|50+种 图表 类型(甘特图等)|40+实用 公式(基于生日计算年龄等)|19项 插入工具(插入二维码、从路径插入图片等)|12项 转换工具(小写金额转大写、汇率转换等)|7项 合并与分割工具(高级合并行、分割单元格等)| …… |
通过Kutools for Excel提升您的Excel技能,体验前所未有的高效办公。 Kutools for Excel提供300多项高级功能,助您提升效率并节省时间。 点击此处获取您最需要的功能……
Office Tab为Office带来多标签界面,让您的工作更加轻松
- 支持在Word、Excel、PowerPoint中进行多标签编辑与阅读。
- 在同一个窗口的新标签页中打开和创建多个文档,而不是分多个窗口。
- 可提升50%的工作效率,每天为您减少数百次鼠标点击!
所有Kutools加载项,一键安装
Kutools for Office套件包含Excel、Word、Outlook和PowerPoint的插件,以及Office Tab Pro,非常适合跨Office应用团队使用。





- 全能套装——Excel、Word、Outlook和PowerPoint插件+Office Tab Pro
- 单一安装包、单一授权——数分钟即可完成设置(支持MSI)
- 协同更高效——提升Office应用间的整体工作效率
- 30天全功能试用——无需注册,无需信用卡
- 超高性价比——比单独购买更实惠