如何批量将多个Word文档转换为PDF文件 Author: Siluvia Last Modified: 2025-05-07 使用Word中的“另存为”功能，可以轻松地将单个Word文档转换为PDF。但是，如果需要一次性将文件夹中的所有Word文档转换为单独的PDF文件，该怎么办呢？本指南将向您展示如何在Word中批量将多个Word文档转换为PDF文件。
使用VBA批量将多个Word文档转换为PDF文件 使用Kutools for Word批量将多个Word文档转换为PDF文件
使用VBA批量将多个Word文档转换为PDF文件以下VBA代码可让您快速将文件夹中的所有Word文档一次性转换为PDF文件。请按照以下步骤操作：
在Word中，按 Alt + F11 打开Microsoft Visual Basic for Applications窗口。 在编辑器中，点击“插入”>“模块”，然后将以下VBA代码复制并粘贴到模块窗口中。 Sub ConvertWordsToPdfs()
'Updated by Extendoffice 20181123
Dim xIndex As String
Dim xDlg As FileDialog
Dim xFolder As Variant
Dim xNewName As String
Dim xFileName As String
Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
If xDlg.Show <> -1 Then Exit Sub
xFolder = xDlg.SelectedItems(1) + "\"
xFileName = Dir(xFolder & "*.*", vbNormal)
While xFileName <> ""
If ((Right(xFileName, 4)) <> ".doc" Or Right(xFileName, 4) <> ".docx") Then
xIndex = InStr(xFileName, ".") + 1
xNewName = Replace(xFileName, Mid(xFileName, xIndex), "pdf")
Documents.Open FileName:=xFolder & xFileName, _
ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
wdOpenFormatAuto, XMLTransform:=""
ActiveDocument.ExportAsFixedFormat OutputFileName:=xFolder & xNewName, _
ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _
Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
BitmapMissingFonts:=True, UseISO19005_1:=False
ActiveDocument.Close
End If
xFileName = Dir()
Wend
End Sub 按 F5 运行代码。 将弹出一个浏览对话框。选择包含要转换为PDF的Word文档的文件夹，然后点击“确定”。 所选文件夹中的所有Word文档都将被转换为单独的PDF文件。
使用Kutools for Word批量将多个Word文档转换为PDF文件如果VBA代码难以处理，您可以尝试Kutools for Word的“转换文档”工具。与Word中的手动方法相比，该工具简化了流程，使其更加便捷和高效。
Kutools for Word，内置 AI 🤖，提供超过 100 种实用功能，助您简化任务。立即下载 点击“Kutools Plus”>“格式转换”。 在“文档格式转换”窗口中，请按照以下步骤操作： 从“类型”下拉菜单中选择“Docx 转 pdf”。 点击 以添加文档： 选择“文件”以添加单个文档。 选择“文件夹”以添加特定文件夹中的所有文档。 默认情况下，PDF文件将保存到与源文件相同的位置。要更改位置，请点击“浏览”按钮 并选择新的目标文件夹。 可选地，勾选“成功后删除源文件”复选框，以便在创建PDF后删除原始文件。 可选地，勾选“保持源文件的更改时间”复选框以保留原始文件的元数据。 所有设置完成后，点击“确定”。 现在，所有.docx格式的文档都已成功转换为PDF文件。
Kutools for Word 是终极的 Word 插件，能够简化您的工作并提升文档处理技能。立即获取！最佳办公生产力工具Kutools for Word - 通过超过 100 个卓越功能提升您的 Word 体验！🤖 Kutools AI 功能：AI助手 / 实时助手 / 超级润色（保留格式）/ 超级翻译（保留格式）/ AI遮挡 / AI校正...
📘 文档精通：拆分页面 / 合并文档 / 以多种格式导出选择内容（PDF/TXT/DOC/HTML...）/ 批量转换为 PDF...
✏ 内容编辑：跨多个文件批量查找和替换 / 调整所有图片大小 / 翻转表格的行和列 / 表格转文本...
🧹 轻松清理：清除多余空格 / 分节符 / 文本框 / 超链接 / 更多清理工具，请前往“清除”组...
➕ 创意插入：插入千位分隔符 / 复选框 / 单选按钮 / 二维码 / 条形码 / 多张图片 / 在“插入 ”组中发现更多...
🔍 精确选择：定位特定页面 / 表格 / 形状 / 标题段落 / 使用更多 选择 功能增强导航...
⭐ 星级增强功能：跳转到任意位置 / 自动插入重复文本 / 在文档窗口之间切换 / 11 种转换 工具...
👉 想尝试这些功能吗？立即下载 Kutools for Word！🚀免费下载 立即购买 了解更多关于 Kutools for Word 的信息 最佳办公生产力工具Kutools for Word - 100+ Word 工具 🤖 Kutools AI 功能：AI助手 / 实时助手 / 超级润色 / 超级翻译 / AI遮挡 / AI校正 📘 文档精通：拆分页面 / 合并文档 / 批量转换为 PDF ✏ 内容编辑：批量查找和替换 / 调整所有图片大小 🧹 轻松清理：清除多余空格 / 清除分节符 ➕ 创意插入：插入千位分隔符 / 插入复选框 / 创建二维码 免费下载 立即购买 了解更多关于 Kutools 的信息