Печиво допомогти нам доставити наші послуги. Користуючись нашими послугами, Ви погоджуєтесь на використання нами куки.
Порада. Інші мови - перекладена Google. Ви можете відвідати English версія цього посилання.
увійти
x
or
x
x
Реєстрація
x

or

Як серійне перетворення файлів формату .doc в .docx у Word?

Якщо ви одержуєте документи формату 97-2003 у форматі Word, то як можна одночасно конвертувати всі ці документи формату .doc у формат .docx? Ця стаття покаже вам два способи вирішення цієї проблеми.

Пакетний перетворення файлів формату .doc на .docx з кодом VBA

Пакетний конвертування файлів формату .doc до .docx за допомогою Kutools для Word


Пакетне перетворення всіх файлів формату .doc у папку у форматі .docx:

повне г, повне г,, показали, від, номер, XNUMX Конвертер формату документів корисність Kutools для Word допомагає одночасно конвертувати всі документи формату .doc у певну папку у форматі .docx. Див. Знімок екрана:

Kutools для Word: з більш ніж 100 зручними надбудовами Word, ви можете вільно спробувати без обмежень в днях 30. Завантажити та безкоштовну пробну версію зараз!


Пакетний перетворення файлів формату .doc на .docx з кодом VBA

У цьому розділі буде показано код VBA для перетворення всіх документів формату .doc у вказану папку до документів .docx одночасно. Будь ласка, робіть так.

1 Будь-ласка, зібрати всі документи формату .doc, які ви конвертуєте в .docx у вказану папку.

2 Натисніть кнопку інший + F11 ключ, щоб відкрити Microsoft Visual Basic для додатків вікна.

3 У вікні натисніть кнопку вставка > Модулі. Потім скопіюйте нижче код VBA у вікно модуля.

Код VBA: пакетне перетворення всіх документів формату .doc в .docx у певну папку

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

4 Натисніть кнопку F5 ключ для запуску коду. У відкритті перегорнути вікно, виберіть папку, яка містить документи формату .doc, і натисніть кнопку OK. Див. Знімок екрана:

Потім всі документи формату .doc конвертуються в документи .docx, як показано на знімку екрана нижче.


Пакетний конвертування файлів формату .doc до .docx за допомогою Kutools для Word

Зручна утиліта буде рекомендована в цьому розділі. З Doc / Docx корисність Kutools для Word, ви можете легко конвертувати всі документи формату .doc у папку до документів .docx. Будь ласка, спробуйте наступним чином.

Kutools для Word : Більше 100 зручних надбудов Word, Безкоштовно спробувати без обмежень в днях 30.

1 Будь ласка, зібрати всі документи формату .doc у вказаній папці, а потім натисніть кнопку Kutools More > Doc / Docx. Див. Знімок екрана:

2 В Конвертер формату документів діалогове вікно, ви повинні зробити наступне:

2.1) Виберіть папку, що містить документи формату .doc у вікні Папка вихідного файлу розділ;

2.2) Виберіть Перетворити документ в docx від Перетворення формату випадаючий список;

2.3) За умовчанням Пункт призначення так само, як джерело коробка перевірена. Якщо ви хочете розмістити всі конвертовані документи .docx у тій самій папці, просто збережіть цей параметр;

Якщо ви хочете розділити документи .docx та документи джерела .doc, зніміть прапорець Пункт призначення так само, як джерело поле і виберіть нову папку, щоб зберегти документи .docx в Зберегти до ящик;

2.4) Натисніть кнопку початок кнопка Див. Знімок екрана:

3 Потім з'явиться діалогове вікно, щоб повідомити, скільки документів було успішно перетворено, натисніть кнопку OK Кнопка і закрити Конвертер формату документів вікна.

Тепер усі документи формату .doc конвертуються у файли .docx. Див. Знімок екрана:

Якщо ви хочете отримати безкоштовну пробну версію цієї утиліти, перейдіть на сторінку безкоштовно завантажити програмне забезпечення спочатку, а потім перейти до застосування операції відповідно до вищевказаних кроків.



Kutools для Outlook

Більше 100 Розширені функції для Outlook 2010, 2013, 2016, 2019 і 365

Екран знімав kutools для перспективи крихітний для банера 201812

додаткові можливості | Безкоштовне завантаження | Тільки $ 39.00 для сотень функцій

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.