如何在Excel中将每个工作表另存为CSV / PDF文件？-伙伴云

如何在Excel中将每个工作表另存为CSV / PDF文件？

网友投稿 336 2024-01-16

如何在Excel中将每个工作表另存为CSV / PDF文件？

例如，您有一个包含多张工作表的大型工作簿，并且想要将每张工作表保存或导出为单独的.csv文件或PDF文件，如何轻松快速地完成工作？在本文中，我将介绍几种解决方法。

使用另存为功能将每个工作表保存或导出为CSV / PDF文件 使用VBA批量保存或将每个工作表导出为CSV文件 将每张表批量保存或导出为 CSV/PDF 文件 Kutools for Excel 使用另存为功能将每个工作表保存或导出为CSV / PDF文件

如您所知，Microsoft Excel可以将当前工作表另存为单个.csv文件或PDF文件。因此，您可以手动将每张图纸分别保存或导出为.csv文件或PDF文件。

1.切换到要保存或导出为单个.csv文件的工作表，然后单击文件（或 办公按钮）> 另存为.

2.在打开的对话框中，指定要将.csv文件保存到的目标文件夹，然后单击 保存类型 框并选择 CSV（以逗号分隔）（* .csv） or PDF（* .pdf） 从下拉列表中，然后单击优惠按钮。

3.将会连续出现两个警告对话框。请点击 OK > 是.

请注意： 如果将活动工作表另存为PDF文件，则不会弹出这些对话框。只需继续下一步即可。

4.重复上述步骤1-3，将其他工作表一张一张保存为单独的.csv文件。

使用VBA批量保存或将每个工作表导出为CSV文件

如果有许多工作表要保存或导出为.csv文件，则第一种方法将非常耗时且乏味。此VBA可以简化工作，并易于将每张图纸保存或导出为.csv文件。

1。按其他 + F11 同时按下键以打开“ Microsoft Visual Basic for Application”窗口。

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

Copy

3。点击运行按钮或按下 F5 运行此VBA的关键。

4.在打开的浏览对话框中，指定要将所有.csv文件保存到的目标文件夹，然后单击 OK 按钮。

然后，您将看到每个工作表都作为单独的.csv文件保存/导出到指定的目标文件夹中。

将每张表批量保存或导出为 CSV/PDF 文件 Kutools for Excel

一些Excel用户出于某些原因可能会拒绝VBA代码。别担心！第三种方法还可以轻松地将每个工作表批量保存或导出为.csv文件或PDF文件。 拆分工作簿 实用程序 Kutools for Excel.

Kutools for Excel - 包括 300 多个方便的 Excel 工具。全功能免费试用 30-天，无需信用卡！ 立即行动吧!

1。点击企业 > 工作簿 > 拆分工作簿.

2.在打开的“拆分工作簿”对话框中，

（1）继续选择所有纸张。如果没有，您可以在之前选中该复选框 工作表名称 选择所有工作表；

（2）检查 指定保存格式 选项;

（3）点击下面的框 指定保存格式 选项，然后选择 CSV（Macintosh）（*。csv） or PDF（* .pdf） 从下拉列表中。

（4）点击分裂按钮。

备注：如果工作簿中存在隐藏的空白工作表，请检查 跳过隐藏的工作表 盒子和 跳过空白工作表 导出时，该框将忽略所有空白或隐藏的工作表。

Kutools for Excel - 包括 300 多个方便的 Excel 工具。全功能免费试用 30-天，无需信用卡！ 立即行动吧!

3.在打开的浏览文件夹对话框中，指定要将所有.csv文件或PDF文件保存到的目标文件夹，然后单击 OK 按钮。

现在，您将看到每个工作表都已导出，并另存为指定文件夹中的.csv文件。

演示：在Excel中将每个工作表保存或导出为CSV / PDF文件

Kutools for Excel 包括适用于Excel的300多种便捷工具，可以在30天之内免费试用。 立即下载并免费试用!

最佳办公生产力工具

将小时转化为分钟 Kutools for Excel!

准备好增强您的 Excel 任务了吗？利用的力量 Kutools for Excel - 您终极的节省时间的工具。简化复杂的任务并像专业人士一样浏览数据。以闪电般的速度体验 Excel！

为什么需要 Kutools for Excel

🛠️ 超过 300 项强大功能: Kutools 包含 300 多项高级功能，可简化您在 1500 多种场景中的工作。

📈 卓越的数据处理能力：合并单元格、删除重复项并执行高级数据转换 - 所有这些都不费吹灰之力！

⏱️ 高效的批量操作：当你可以聪明地工作时，为什么还要付出额外的努力呢？轻松批量导入、导出、组合和调整数据。

📊 可定制的图表和报告：访问各种附加图表并生成富有洞察力的报告。

🗄️ 强大的导航窗格：通过强大的列管理器、工作表管理器和自定义收藏夹获得优势。

📝 七种类型的下拉列表：通过各种功能和类型的下拉列表使数据输入变得轻而易举。

🎓 用户友好：对于初学者来说轻而易举，对于专家来说是一个强大的工具。

立即下载，与 Excel 一起穿越时空！

阅读更多免费下载... 采购...

Office Tab 为 Office 带来选项卡式界面，让您的工作更轻松

在Word，Excel，PowerPoint中启用选项卡式编辑和阅读，发布者，Access，Visio和Project。在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。每天将您的工作效率提高50％，并减少数百次鼠标单击！

阅读更多免费下载... 采购...

如何轻松快速删除Excel中的空白行提升工作效率

336 2024-01-16

如何在Excel中将每个工作表另存为CSV / PDF文件？