跳至主要内容

Kutools for Office — 一套工具,五种功能。事半功倍。

如何在 Word 中批量将 .doc 文件转换为 .docx 格式?

Author: Siluvia Last Modified: 2025-08-22

如果您收到了多个旧版 97-2003 格式的 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
    The VBA code is pasted into the Module window
  4. F5 运行代码。在弹出的 浏览 窗口中,选择包含 .doc 文件的文件夹,然后点击 确定.
    Browse window

所选文件夹中的所有 .doc 格式文件将立即被转换为 .docx 文件,如下图所示:

All .doc format documents are converted to .docx documents

使用 Kutools for Word 批量将 .doc 文件转换为 .docx 格式

本节介绍了一种用于批量转换的便捷工具。通过 Kutools for WordDoc/Docx 工具,您可以轻松地通过几次点击将文件夹中的所有 .doc 格式文档转换为 .docx 格式。请按照以下步骤操作:

Kutools for Word搭载 AI 🤖,提供超过 100 项实用功能,简化您的任务。
  1. 在空白文档中,点击 Kutools Plus > Doc/Docx.
    Doc/Docx button on the ribbon
  2. 文档格式转换 窗口中,按照以下步骤操作:
    1. 从类型下拉菜单中选择 Doc 转 Docx。
    2. 点击 Add button 添加需要转换的文档:
      • 选择文件以添加单个文档。
      • 选择文件夹以添加特定文件夹中的所有文档。
    3. 默认情况下,PDF 文件将保存到与源文件相同的位置。若要更改位置,请点击 浏览 按钮 Browse button 并选择新的目标位置。
    4. 可选地,勾选成功后删除源文件框,在 PDF 创建后移除原始文件。
    5. 可选地,勾选保持源文件的更改时间框以保留原始文件元数据。
    6. 所有设置完成后,点击确定。
    Document Format Converter dialog box
  3. 转换完成后,将出现一个对话框,指示有多少文档已成功转换。点击确定按钮并关闭文档格式转换窗口。

现在,所有 .doc 格式的文档都已成功转换为 .docx 文件。

Kutools for Word 是终极的 Word 插件,能够简化您的工作并提升文档处理技能。立即获取!

最佳Office办公效率工具

Kutools for Word - 用超过100项强大功能全面提升你的Word体验!

🤖 Kutools AI 功能AI助手 / 实时助手 / 超级润色(保留格式)/ 超级翻译(保留格式)/ AI遮挡 / AI校正……

📘 文档掌控分割页面 / 文档合并 / 区域导出为多种格式(PDF/TXT/DOC/HTML等)/ 批量转换为PDF……

正文编辑跨多个文件批量查找与替换 / 一键调整所有图片大小 / 翻转表格行列 / 表格转文本……

🧹 高效清理:一扫多余空格 / 分节符 / 文本框 / 超链接 / 想了解更多删除工具,请前往删除分组……

创意插入:插入千位区分符 /复选框 /选项按钮 / 二维码 / 条形码 / 批量插入图片 / 更多内容请见插入分组……

🔍 精准选取:快速定位指定页面 / 表格 / 形状 / 标题段落 / 利用更多 选择 功能提升导航体验……

实用增强跳转任意区域 / 自动插入重复文本 / 文档窗口间一键切换 /11 转换工具……

🌍 支持40多种语言:自由选择你喜欢的界面语言——Kutools支持英语、西班牙语、德语、法语、中文及其他40余种语言!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 想立即体验这些功能?马上下载 Kutools for Word!🚀
 

✨ Kutools for Office – 一次安装,五大强力工具集成!

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

📦 五大工具一站式集成 | 🔗 无缝兼容Microsoft Office | ⚡立即提升效率、节省时间

最佳Office办公效率工具

Kutools for Word - 100+ 项Word工具