KutoolsforOffice — 一套方案,五大工具。事半功倍。三月特賣:20% 折扣

如何在 Word 中批量將 .doc 檔案轉換為 .docx 格式?

作者Siluvia修改日期

如果您收到多份舊版 97-2003 .doc 格式的 Word 文件,逐一轉換為現代化的 .docx 格式確實相當耗時。本指南為您介紹兩種高效方法,可輕鬆批次將 .doc 檔案轉換為 .docx:使用 VBA 程式碼,或搭配功能強大的 Kutools for Word 增益集。

使用 VBA 程式碼批次將 .doc 檔案轉換為 .docx 格式
使用 Kutools for Word 批次將 .doc 檔案轉換為 .docx 格式


使用 VBA 程式碼批次將 .doc 檔案轉換為 .docx 格式

本節將示範如何運用 VBA 程式碼,一鍵將指定資料夾內所有 .doc 檔案轉換為 .docx 格式。請依下列步驟操作:

  1. 將所有待轉換的 .doc 檔案整合至單一文件中。
  2. 按下 Alt + F11,立即開啟 Microsoft Visual Basic for Applications 視窗!
  3. 在 VBA 視窗中,按一下插入> 模組。將下列 VBA 程式碼複製並貼上至模組視窗中:
    Sub ConvertDocToDocx()
    'Updated by ExtendOffice 20181128
        Dim xDlg As FileDialog
        Dim xFolder As Variant
        Dim xFileName As String
        Application.ScreenUpdating = False
        Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
        If xDlg.Show <> -1 Then Exit Sub
        xFolder = xDlg.SelectedItems(1) + "\"
        xFileName = Dir(xFolder & "*.doc", vbNormal)
        While xFileName <> ""
            Documents.Open FileName:=xFolder & xFileName, _
                ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
                PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                wdOpenFormatAuto, XMLTransform:=""
            ActiveDocument.SaveAs xFolder & Replace(xFileName, "doc", "docx"), wdFormatDocumentDefault
            ActiveDocument.Close
            xFileName = Dir()
        Wend
        Application.ScreenUpdating = True
    End Sub
    VBA 程式碼已貼上至模組視窗
  4. 按下 F5 以執行程式碼。在出現的瀏覽視窗中,選取包含 .doc 檔案的資料夾,然後按一下確定
    瀏覽視窗

所選資料夾中的所有 .doc 格式檔案將立即轉換為 .docx 檔案,如下方截圖所示:

所有 .doc 格式的文件均已轉換為 .docx 文件

使用 Kutools for Word 批次將 .doc 檔案轉換為 .docx 格式

本節介紹一款便捷的批次轉換工具!透過 Kutools for Word 中的 Doc/Docx 功能,只需幾次點擊,即可輕鬆將資料夾內所有 .doc 格式文件轉換為 .docx 格式——立即體驗高效辦公!請依照下列步驟操作:

Kutools for Word

Kutools for Word 讓您透過 Microsoft Word 內建的實用工具,輕鬆快速完成日常文件任務——無需編寫程式碼,也無需繁瑣設定。

  • AI 寫作、潤飾、翻譯與摘要
  • 批量查找與替換跨文件操作
  • 輕鬆合併與分割 Word 文件
  • 批次轉換 Word ↔ PDF
  1. 在空白文件中,點擊 KUTOOLS PLUS > Doc/Docx
    功能區上的 Doc/Docx 按鈕
  2. 文件格式轉換視窗中,請依照下列步驟操作:
    1. 轉換格式下拉式選單中,選取 Doc 轉 Docx
    2. 按一下新增按鈕以新增您需要轉換的文件:
      • 選擇檔案以新增個別文件。
      • 選擇資料夾,即可新增該資料夾中的所有文件。
    3. 預設情況下,PDF 檔案將儲存至與來源檔案相同的位置。若要變更儲存位置,請點選瀏覽按鈕瀏覽按鈕,並選擇新的目的地。
    4. (可選)勾選成功後刪除源文件核取方塊,即可在建立 PDF 後自動刪除原始檔案。
    5. (可選)勾選保持源文件的更改時間核取方塊,即可保留原始檔案的中繼資料。
    6. 完成所有設定後,請點選確定
    文件格式轉換器對話框
  3. 轉換完成後,將出現一個對話方塊,顯示成功轉換的文件數量。請點選確定按鈕,並關閉文件格式轉換視窗。

現在,所有 .doc 格式的檔案都已成功轉換為 .docx 檔案。

想在 Word 中更快速完成重複性任務嗎?試試 Kutools for Word,讓您的日常操作更輕鬆高效!

最佳 Office 生產力工具

Kutools for Word——透過超過 100 項卓越功能,全面提升您的 Word 體驗!

🤖KUTOOLS AI 功能AI 助手/即時助手/超級潤色(保留格式)/超級翻譯(保留格式)/AI 遮擋/AI 校正……

📘 文件掌控力分割頁面/文檔合併/以多種格式匯出選取內容(PDF/TXT/DOC/HTML……)/批次轉換為 PDF……

內容編輯批量查找與替換多個檔案/調整所有圖片大小/翻轉表格列與欄/表格轉文本……

🧹 輕鬆清理:一鍵清除多餘空格分節符文字框超連結!想要更多清除工具?立即前往移除群組……

創意插入:插入千位分隔符/複選框/選項按鈕/二維碼/條碼/多張圖片/ 更多功能請至插入群組……

🔍 精準選取:精確定位特定頁面/表格/圖形/標題段落/ 透過更多選取功能提升導覽效率……

星級增強功能快速跳轉至任意位置/自動插入重複文字/在文件 Windows 之間切換/11 轉換工具……

🌍 支援 40+ 種語言:使用您熟悉的慣用語言暢享 Kutools!支援英文、西班牙文、德文、法文、中文等 40 多種語言,操作更順手、體驗更流暢!

Kutools for Word 個分頁位於功能區上
 
 

Office Tab- 為 Office 帶來分頁式介面,讓您的工作更輕鬆

  • 在 Word、Excel、PowerPoint、Publisher、Access、Visio 與 Project 中啟用分頁式編輯與閱讀體驗。
  • 在同視窗的新分頁中開啟並建立多份文件,而非另開新視窗。
  • 每天為您減少數百次滑鼠點擊,生產力提升 50%!

✨ Kutools for Office – 一次安裝,五大強大工具!

包含 Office Tab Pro·Kutools for Excel·Kutools for Outlook·Kutools for Word·Kutools for PowerPoint

📦 一套整合 5 項工具 | 🔗 與 Microsoft Office 無縫整合 | ⚡ 保存時間,立即提升生產力

最佳 Office 生產力工具

Kutools for Word- Word 專用 100+ 項工具