如何批量將多個Word文檔轉換為PDF文件
使用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 Plus」>「Doc/Docx」。
- 在「文件格式轉換」窗口中,按照以下步驟操作:
- 從「類型」下拉菜單中選擇「Convert docx to pdf」。
- 點擊
添加文檔:
- 選擇「文件」以添加單個文檔。
- 選擇「文件夾」以添加特定文件夾中的所有文檔。
- 默認情況下,PDF文件將保存到與源文件相同的位置。若要更改位置,請點擊「瀏覽」按鈕
並選擇新的目標文件。
- 可選地,勾選「成功後刪除源文件」框,以便在創建PDF後刪除原始文件。
- 可選地,勾選「保持源文件的更改時間」框以保留原始文件的元數據。
- 所有設置完成後,點擊「確定」。
現在,所有.docx格式的文檔都已成功轉換為PDF文件。
最佳辦公效率工具
Kutools for Word -讓你的 Word進階,擁有超過 100 項強大功能!
🤖 Kutools AI Features:AI Assistant / 即時助手 / 超級潤色(保留格式) / 超級翻譯(保留格式) / AI遮擋 / AI校正...
📘 文檔掌控:文檔拆分頁面 / 文檔合併 / 選取內容多格式導出(PDF/TXT/DOC/HTML...)/ 批量轉換為 PDF...
✏內容編輯:跨多個文件批量查找與替換 / 圖片大小統一調整 / 行列翻轉表格 / 表格轉文本...
🧹 潔淨無憂:一鍵清除多餘空格 / 分節符 /文字方塊 / 超鏈接 / 更多清除工具請至 清除所有 群組...
➕ 創新插入:插入千位分隔符 / 複選框 / 選項按鈕 / 二維碼 / 條形碼 / 批量插入圖片 / 更多插入功能請前往 插入 群組...
🔍 精準選取:鎖定特定頁面 / 表格 / 形狀 / 標題段落 / 使用更多 選取 功能提升導航效率...
⭐ 優質強化:輕鬆跳轉至文件夾 / 自動插入重複文字 / 切換文檔窗口 /11 項轉換工具...
🌍 支援40+ 種語言:可用您的偏好語言體驗 Kutools —— 支援英語、西班牙語、德語、法語、中文等超過40 種語言!
