KutoolsforOffice — 一套方案，五大工具。事半功倍。

Excel：将所有工作表保存或导出为单独的 CSV 或纯文本（2 种简便方法）

作者Siluvia修改日期

在数据分析、报表制作与信息共享领域，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 文件。每个文件将自动以其对应工作表命名，便于整理导出的数据。下方截图展示了导出文件的示例：

保存在“文档”文件夹中的多个 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 > 工作簿 > 分割工作簿，即可启动批量导出界面。参见下方截图：

Excel 中 Kutools Plus 选项卡上的“拆分工作簿”选项的屏幕截图

2. 在分割工作簿对话框中，您将看到所有工作表名称及其对应的复选框：

  • 1）。要导出所有工作表，请在工作表名称部分保持所有项目勾选；若仅需导出特定工作表，请取消勾选要排除的项目。
  • 2）。在选项区域，启用指定保存格式下拉菜单，并选择 Unicode 文本（*.txt）或 CSV (Macintosh)(*.csv)作为您首选的文件类型。选择合适的格式，即可确保文件无缝导入主流数据库、其他电子表格程序或文本编辑器。
  • 3）。完成选择后，单击拆分按钮即可继续。

“拆分工作簿”对话框的屏幕截图

3. 当浏览文件夹对话框弹出时，请选择要保存导出文件的文件夹，然后点击确定开始导出。请留意目标目录，以便轻松访问导出的文件。

Excel 中用于指定保存文件夹的“浏览文件夹”对话框的屏幕截图

Kutools 将立即处理您的选择，将全部或选定的工作表以独立的 CSV 或纯文本文件形式保存至指定位置，文件名自动匹配工作表名称，极大简化了数据导出后的整理与追踪。

为什么选择 Kutools for Excel？

与手动导出或使用 VBA 宏相比，Kutools for Excel 为个人用户和组织提供了独特优势：

  • ⚡ 批量导出，轻松省力——高效导出全部或选定的工作表，几秒钟即可完成原本使用 Excel 原生功能或手动操作耗时更久的任务。
  • 📁 多样化的输出选项——支持 CSV、TXT、PDF、XLSX 和 XLS 等多种格式，确保导出文件轻松兼容各类平台与业务需求！
  • 🔍 灵活选择工作表——可自由包含或排除隐藏及空白工作表，让您的导出内容简洁聚焦于相关数据。
  • 🧾 清晰的文件命名——默认情况下，每个输出文件均以其工作表名称命名，有效避免导出后因文件名混淆而需手动重命名。
  • 🧩 无需任何脚本知识——整个流程完全图形化、操作简单，无论技术背景如何，都能轻松导出数据！

演示：使用 Kutools for Excel 将多个/所有工作表保存、导出或转换为 CSV 或纯文本

 
Kutools for Excel：超过 300 款实用工具触手可及！畅享 AI 驱动的功能，让工作更智能、更高效！立即下载！

最佳办公效率工具

🤖KUTOOLS AI 助手：基于以下内容革新数据分析：智能执行   |  生成代码|  创建自定义公式  |  数据分析及生成图表|  调用 Kutools Functions……
热门功能：查找、高亮或标记重复项   |  删除空白行   |  合并列或单元格且不丢失数据   |  不使用公式的四舍五入……
高级 LOOKUP：多条件 VLookup  |  多值 VLookup  |   跨多工作表 VLookup   |   模糊查找……
高级下拉列表：快速创建下拉列表   |  级联下拉列表   |  多选下拉列表……
列管理器：添加指定数量的列|移动列|切换隐藏列的可见性状态|比较区域与列……
特色功能：网格聚焦   |  设计视图   |增强编辑栏   | 工作簿和表管理器   |  资源库（自动文本）|  日期提取   |  汇总工作表  |  加密/解密单元格   | 按列表发送邮件   |  超级筛选   |   特殊筛选（筛选粗体单元格/斜体/删除线……） ......
精选 15 工具集：12 文本工具（添加文本，删除特定字符，……）|   50+ 图表 类型（甘特图，……）|   40+ 实用公式（基于生日计算年龄，……）|   19 插入工具（插入二维码，从路径插入图片，……）|   12 转换工具（小写金额转大写，汇率转换，……）|   7 合并和拆分工具（高级合并行，分割单元格，……）|……更多
在您的首选语言中使用 Kutools – 支持英语、西班牙语、德语、法语、中文及 40+ 种其他语言！

使用 Kutools for Excel 大幅提升您的 Excel 技能，体验前所未有的高效。Kutools for Excel 提供 300 多项高级功能，助您提升生产力、节省时间。立即点击此处，获取您最需要的功能……

Office Tab 为 Office 带来标签式界面，让您的工作更轻松

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 和 Project 中启用标签式编辑和阅读。
  • 在同一个窗口的新标签页中打开并创建多个文档，而非在新窗口中。
  • 将您的工作效率提升 50%，每天减少数百次鼠标点击！

所有 Kutools 插件，一个安装程序

Kutools for Office 套件捆绑了适用于 Excel、Word、Outlook 和 PowerPoint 的插件以及 Office Tab Pro，非常适合需要跨多个 Office 应用高效协作的团队。

ExcelWordOutlookTabsPowerPoint
  • 一体化套件— Excel、Word、Outlook 和 PowerPoint 插件 + Office Tab Pro
  • 一个安装程序，一个许可证— 几分钟内完成设置（支持 MSI）
  • 协同效果更佳— 在多个 Office 应用中实现高效协同
  • 30 天全功能试用— 无需注册，无需信用卡
  • 超值之选— 比单独购买插件更省钱