如何在 Excel 中将每个工作表分别另存为或导出为 CSV 或 PDF 文件？

将单个工作表导出为 CSV 或 PDF 文件最直接的方法是使用 Excel 内置的另存为功能。如果您只需导出少量工作表，或希望在保存前全面审阅并调整每个文件，此方法尤为适用。然而，若工作簿包含大量工作表，为每个工作表手动执行这些步骤可能会变得繁琐耗时。

优势：操作简单，无需额外工具或编程，导出前即可审查或调整工作表。
局限性：处理多个工作表时需重复操作，耗时费力；无法一次性批量处理所有工作表。

1. 点击底部的工作表标签，激活您要导出为独立 CSV 或 PDF 文件的工作表，然后转到文件（或 ）Office 按钮）> 另存为。

2. 在弹出的“另存为”对话框中，选择要存储文件的目标文件夹，点击指定保存格式下拉菜单，根据导出需求选择 CSV（逗号分隔）（*.csv）或 PDF (*.pdf)，准备就绪后，点击保存按钮。

3. 如果您要保存为 CSV 格式，Excel 将显示两个警告对话框：第一个提示仅保存当前工作表，第二个提示 CSV 不支持的功能可能丢失。请在第一条消息上点击确定，然后在下一条消息上点击是以继续。

注意：若选择保存为 PDF，将不会弹出这些警告消息，可直接保存。

4. 如需导出其他工作表，请对每个要保存的工作表重复步骤 1-3.

其他提示与提醒：

• 在另存为 CSV 之前，请确保您的工作表中不含需保留的公式或格式，因为 CSV 仅保存原始数据。
• 另存为 PDF 时，建议设置打印区域并调整页面布局，以获得最佳效果。
• 请务必小心，避免覆盖目标文件夹中同名的文件，尤其是在工作表名称相似的情况下。

故障排除：如果 Excel 提示“如果将工作簿保存为 CSV，某些功能可能会丢失”，这属于 CSV 格式的正常现象——因其不支持公式、格式或多工作表，每个文件仅导出当前工作表。

当工作簿包含大量工作表时，使用另存为功能手动导出每个工作表会变得繁琐。此时，可借助 Excel 加载项（如 ）Kutools for Excel）提供的高效替代方案——其分割工作簿工具能帮您批量快速将每个工作表导出为独立的 CSV、PDF 或其他文件类型，显著节省时间和精力。

优势：可同时处理大量工作表，支持多种格式，灵活跳过隐藏或空白工作表，操作简单、用户友好。
局限性：需安装 Kutools for Excel；若受 IT 策略限制无法使用加载项，则不适用。

1. 在 Excel 功能区上，点击 KUTOOLS PLUS > 工作簿 > 分割工作簿。

2. 在分割工作簿对话框中，按以下方式设置您的偏好：

（1）确保所有工作表均已选中以进行拆分。如您此前取消选择部分工作表，请勾选工作表名称前的复选框，重新全选所有工作表。

（2）勾选指定保存格式复选框。

（3）点击指定保存格式下方的框，选择 CSV (*.csv)或 PDF (*.pdf)作为导出文件类型。

（4）点击拆分按钮即可继续。

注意：如需在导出时排除不可见或空白的工作表，请勾选忽略隐藏工作表和/或跳过空白工作表选项，确保输出文件内容精简相关，避免导出冗余数据。

Kutools for Excel——通过 300 多款必备工具全面增强 Excel 功能，助您工作更快速、更轻松，并借助 AI 功能实现更智能的数据处理与高效办公！立即获取

3. 在弹出的浏览文件夹对话框中，选择用于保存所有输出文件（CSV 或 PDF）的目标文件夹，然后点击确定确认。

该工具将处理您的工作簿，为每个选定的工作表生成独立文件（采用所选格式），并保存至您指定的文件夹中。

当您需要将数十甚至数百个工作表导出为独立的 CSV 文件时，手动操作会过于耗时。为自动化此过程，您可以利用 Excel 内置的 Visual Basic for Applications （VBA） 编辑器，运行脚本以通过几次点击导出所有工作表。此方法非常适合熟悉基本代码执行、需要灵活且可重复解决方案的用户，尤其适用于未来处理类似任务时。

优势：完全自动化，无需第三方加载项，可针对不同工作簿灵活自定义并重复使用。
局限性：需进行初始设置、具备基础 VBA 知识，并拥有在 Excel 环境中运行宏的权限。

注意事项：

• 运行宏前，请务必备份您的工作簿。
• 禁用或检查可能影响文件保存的现有宏。

按照以下步骤应用 VBA 解决方案：

1. 按下 Alt+F11，即可打开 Microsoft Visual Basic for Applications 窗口。

2. 点击插入> 模块，并将提供的 VBA 代码粘贴到新打开的模块窗口中。

VBA：将每个工作表另存为独立的 CSV 文件

Public Sub SaveWorksheetsAsCsv()
Dim xWs As Worksheet
Dim xDir As String
Dim folder As FileDialog
Set folder = Application.FileDialog(msoFileDialogFolderPicker)
If folder.Show <> -1 Then Exit Sub
xDir = folder.SelectedItems(1)
For Each xWs In Application.ActiveWorkbook.Worksheets
xWs.SaveAs xDir & "\" & xWs.Name, xlCSV
Next
End Sub

3. 要运行代码，请点击 VBA 编辑器中运行按钮（“播放”三角图标），或直接按 F5 键。Excel 将提示您选择目标文件夹。

4. 在文件夹选择对话框中，浏览并指定所有 CSV 文件的保存位置，然后点击确定。

宏运行完成后，您将在指定文件夹中找到每个工作表导出的独立 CSV 文件，文件名与对应工作表名称一致。

实用技巧：

• 即使某个工作表为空，系统仍可能生成对应的 CSV 文件（但文件内容为空）。
• 如果您的工作簿包含超大工作表，导出过程可能需要一些时间——请耐心等待完成提示（如有）或直至文件生成。

故障排除：

• 如果宏无法访问目标位置（如因写保护或权限错误），请选择您拥有完全访问权限的文件夹，例如“文档”或“桌面”。
• 如果文件未显示，请检查该工作表是否被隐藏或受保护——如有需要，可修改代码以涵盖这些情况。

对于无法或不愿使用宏或加载项，但仍需快速将工作表内容准备为 CSV 文件以导出的场景，Excel 公式可帮助您将数据组装为 CSV 兼容格式。虽然公式无法直接导出文件，但您可以使用公式将单元格值连接成格式正确的文本，然后将其复制并使用记事本或其他文本编辑器保存为 .csv 文件。

优势：无需宏或加载项，轻松应对小型数据集和偶尔的一次性导出。
局限性：需手动完成导出操作，最适合结构简单、格式统一的表格，不适用于大型或复杂的数据结构。若各工作表的行列长度不一致，可能还需调整公式。

操作说明：

1. 假设您的数据位于 A 列至 D 列、第 1 行至第 100 行。在单元格 E1 中输入以下公式，将 A 至 D 列合并为一行 CSV 格式文本（请根据您的数据范围酌情修改）：

=A1 & "," & B1 & "," & C1 & "," & D1

2. 将 E1 中的公式向下复制到所有包含数据的行（例如 E1:E100）。选中 E 列（生成的文本行），按 Ctrl+C 复制，然后粘贴到记事本或其他文本编辑器中。

3. 将纯文本保存为 .csv 扩展名，例如 Sheet 1.csv。现在，您的数据即可在 Excel 中重新打开，或用于其他系统。

参数说明：若列数更多或更少，请相应调整公式——按需增减单元格引用及逗号。
提示：若数值中包含逗号（可能干扰 CSV 解析），请在公式中为每个值添加英文引号：

="""" & A1 & """,""" & B1 & """,""" & C1 & """,""" & D1 & """"

保存后，请在 Excel 中重新打开该文件，验证数据结构和格式是否正确。

故障排除：如果打开 CSV 文件时列显示异常（如合并或分隔不正确），请检查系统区域设置中的列表分隔符（逗号 vs. 分号），并相应调整公式中的分隔符。