Как пакетно преобразовать файлы .doc в формат .docx в Word?

АвторSiluviaДата изменения2025-01-24

Если у вас есть несколько документов Word в устаревшем формате 97–2003 (.doc), их поочерёдное преобразование в современный формат .docx может занять немало времени. В этом руководстве описаны два эффективных способа пакетного преобразования файлов .doc в .docx: с помощью кода VBA или мощной надстройки Kutools для Word.

Пакетное преобразование файлов .doc в формат .docx с помощью кода VBA
Пакетное преобразование файлов .doc в формат .docx с помощью Kutools для Word

Пакетное преобразование файлов .doc в формат .docx с помощью кода VBA

В этом разделе показано, как с помощью кода VBA одновременно преобразовать все файлы формата .doc из указанной папки в формат .docx. Выполните следующие шаги:

Соберите все файлы .doc, которые требуется преобразовать, в одну папку.
Нажмите сочетание клавиш Alt + F11, чтобы открыть окно Microsoft Visual Basic для приложений.

В окне 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

Нажмите клавишу F5, чтобы запустить код. В появившемся окне Обзор выберите папку с файлами .doc и нажмите кнопку ОК.

Все файлы в формате .doc из выбранной папки будут немедленно преобразованы в файлы .docx, как показано на рисунке ниже:

Все документы в формате .doc преобразованы в документы .docx

Пакетное преобразование файлов .doc в формат .docx с помощью Kutools для Word

В этом разделе представлена удобная утилита для пакетного преобразования. С помощью утилиты Doc/Docx в Kutools для Word вы можете легко преобразовать все документы в формате .doc из папки в формат .docx всего за несколько кликов. Выполните следующие действия:

В пустом документе нажмите KUTOOLS PLUS>Doc/Docx.
В окне Конвертер форматов документоввыполните следующие действия:
1. Выберите Doc в Docx в меню Преобразование формата со списком.
2. Нажмите для добавления документов, которые необходимо преобразовать:
  - Выберите Файлы, чтобы добавить отдельные документы.
  - Выберите Папку, чтобы добавить все документы из указанной папки.
3. По умолчанию файлы PDF сохраняются в том же месте, что и исходные файлы. Чтобы изменить расположение, нажмите кнопку Обзор и выберите новое место назначения.
4. При необходимости установите флажок Удалить исходные файлы после конвертации, чтобы удалить исходные файлы после создания PDF-документов.
5. При необходимости установите флажок Сохранить дату изменения исходных файлов, чтобы сохранить метаданные исходных файлов.
6. После завершения настройки нажмите кнопку ОК.
После завершения преобразования появится диалоговое окно с информацией о количестве успешно преобразованных документов. Нажмите кнопку ОК и закройте окно Конвертер форматов документов.

Теперь все документы в формате .doc успешно преобразованы в файлы .docx.

Хотите быстрее справляться с похожими задачами в Word? Попробуйте Kutools для Word и сделайте свою повседневную работу проще!

Скачать Подробнее

Лучшие инструменты для повышения продуктивности в Office

Kutools для Word — раскройте весь потенциал Word с помощью более чем 100 мощных функций!

🤖Функции KUTOOLS AI: AI Ассистент / Ассистент в реальном времени / Супер полировка (сохранить формат) / Супер перевод (сохранить формат) / Искусственный интеллект для редактирования / Проверка с помощью ИИ…

📘Мастерство работы с документами: Разделение страниц / Объединение документов / Экспорт выделенного фрагмента в различных форматах (PDF, TXT, DOC, HTML и др.) / Пакетное преобразование в PDF…

✏Редактирование содержимого: Пакетный поиск и замена в нескольких файлах / Изменение размера всех изображений / Транспонировать таблицу строк и столбцов / Преобразовать таблицу в текст…

🧹Легкая очистка: удалите лишние пробелы, разрывы разделов, текстовые поля и гиперссылки. Чтобы узнать больше об инструментах удаления, перейдите в группу Удалить…

➕Креативные вставки: вставляйте разделители разрядов, флажки, переключатели, QR-коды, штрихкоды и несколько изображений. Узнайте больше в группе Вставка…

🔍Точное выделение: выделяйте определённые страницы, таблицы, фигуры и абзацы заголовков — улучшите навигацию с помощью расширенных функций выделенияfeatures ……

⭐Звёздные улучшения: Переход к любому месту / Автоматическая вставка повторяющегося текста / Переключение между документами Windows / 11преобразования Инструменты…

🌍Поддержка более чем 40 языков: Используйте Kutools на предпочитаемом языке — доступны английский, испанский, немецкий, французский, китайский и ещё более 40 языков!

Бесплатно скачать Купить сейчас Подробнее

Office Tab– Добавляет вкладки в Office и значительно упрощает вашу работу

Включите редактирование и чтение с вкладками в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в отдельных окнах.
Повышает продуктивность на 50 % и экономит сотни кликов мышью каждый день!

Бесплатно скачать Купить сейчас Подробнее

✨ Kutools for Office – Одна установка, пять мощных инструментов!

Включает в себя Office Tab Pro·Kutools для Excel·Kutools для Outlook·Kutools для Word·Kutools for PowerPoint

📦 Получите все 5 инструментов в одном пакете | 🔗 Бесшовная интеграция с Microsoft Office | ⚡ Экономия времени и мгновенно повысьте продуктивность

⬇️ Скачать сейчас 🎁 Приобрести полный пакет 📖 Подробнее

Лучшие инструменты для повышения продуктивности в Office

Kutools для Word– 100+ инструментов для Word

🤖KUTOOLS AI функции:AI Ассистент/Ассистент в Реальном Времени/Супер Полировка/Супер Перевод/Искусственный интеллект для редактирования/Проверка с помощью ИИ
📘Мастерство работы с документами:Разделение страниц/Объединить документы/Пакетное преобразование в PDF
✏Редактирование содержимого:Пакетный поиск и замена/Изменение размера всех изображений
🧹Легкая очистка:Удаление лишних пробелов/Удалить Разрыв раздела
➕Креативные вставки:Вставка разделителей разрядов/Вставить Флажок/Создать QR-код
🌍Поддержка более чем 40 языков: Kutools говорит на вашем языке — доступно более 40 языков!

Бесплатно скачать Купить сейчас Подробнее о Kutools