跳至主要内容

Kutools for Office — 一套工具,五种功能。事半功倍。

Excel:将所有工作表保存或导出为单独的CSV或文本文件(2种简单方法)

Author Siluvia Last modified

在数据分析、报告和信息共享的世界中,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 文件,并存储在您的“文档”文件夹中。每个文件都会根据各自的工作表名称自动命名,从而简化了导出数据的组织过程。请参见下面的截图示例:

A screenshot of multiple CSV files saved in the Documents folder

注意事项:根据工作簿大小和工作表数量,导出过程可能需要几秒钟。在运行任何 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 导出类似,生成的文本文件将保存在您的“文档”文件夹中,每个文件都将根据其来源的工作表名称自动命名。请参见下面的截图示例。

A screenshot of multiple Text files saved in the Documents folder

重要注意事项:在导出为文本时,除非代码另行指定,否则 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 > 工作簿 > 分割工作簿。这将启动批量导出界面。请参见下面的截图:

A screenshot of the Split Workbook option on the Kutools Plus tab in Excel

2. 在“分割工作簿”对话框中,您会看到所有列出的工作表名称及其复选框:

  • 1). 若要导出所有工作表,请保持“工作表名称”部分中的所有项目选中。如果您只想导出某些工作表,请取消选中要排除的工作表。
  • 2). 在“选项”区域中,启用“指定保存格式”下拉菜单并选择 Unicode 文本 (*.txt)CSV (Macintosh)(*.csv) 作为您选择的文件格式。选择适当的格式可以无缝导入大多数主要数据库、其他电子表格程序或文本编辑器中。
  • 3). 完成选择后,点击“分割”按钮继续。

A screenshot of the Split Workbook dialog box

3. 当“浏览文件夹”对话框提示时,选择要保存导出文件的文件夹。点击“确定”开始导出。请注意目标目录,以确保轻松访问您的导出文档。

A screenshot of the Browse For Folder dialog box in Excel to specify a folder to save files

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多项高级功能,助您提升效率并节省时间。 点击此处获取您最需要的功能……


Office Tab为Office带来多标签界面,让您的工作更加轻松

  • 支持在Word、Excel、PowerPoint中进行多标签编辑与阅读
  • 在同一个窗口的新标签页中打开和创建多个文档,而不是分多个窗口。
  • 可提升50%的工作效率,每天为您减少数百次鼠标点击!

所有Kutools加载项,一键安装

Kutools for Office套件包含Excel、Word、Outlook和PowerPoint的插件,以及Office Tab Pro,非常适合跨Office应用团队使用。

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