Word'de .doc biçimindeki dosyaları toplu olarak .docx'e nasıl dönüştürebilirim?

97-2003 biçimindeki bazı Word belgelerini aldığınızı varsayarsak, tüm bu .doc biçimindeki belgeleri tek seferde toplu olarak .docx biçimine nasıl dönüştürebilirsiniz? Bu makale size bu sorunu çözmek için iki yöntem gösterecektir.

VBA kodu ile .doc formatındaki dosyaları toplu olarak .docx'e dönüştürün
Kutools for Word ile .doc formatındaki dosyaları toplu olarak .docx'e dönüştürün

VBA kodu ile .doc formatındaki dosyaları toplu olarak .docx'e dönüştürün

Bu bölümde, belirtilen bir klasördeki tüm .doc biçimindeki belgeleri aynı anda .docx belgelerine dönüştürmek için VBA kodunu göstereceğiz. Lütfen aşağıdaki işlemleri yapın.

1. Lütfen .docx'e dönüştüreceğiniz tüm .doc biçimindeki belgeleri belirtilen bir klasörde toplayın.

2. Tuşuna basın. Ara Toplam + F11 tuşuna basarak Uygulamalar için Microsoft Visual Basic pencere.

3. Pencerede tıklayın Ekle > modül. Ardından, VBA kodunu Modül penceresine kopyalayın.

VBA kodu: Tüm .doc biçimindeki belgeleri belirli bir klasörde toplu olarak .docx'e dönüştürün

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. Tuşuna basın. F5 kodu çalıştırmak için anahtar. Açılışta Araştır penceresinde, .doc formatındaki belgeleri içeren klasörü seçin ve tıklayın OK. Ekran görüntüsüne bakın:

Ardından, tüm .doc biçimindeki belgeler, aşağıda gösterilen ekran görüntüsü gibi hemen .docx belgelerine dönüştürülür.

Kutools for Word ile .doc formatındaki dosyaları toplu olarak .docx'e dönüştürün

Bu bölümde kullanışlı bir yardımcı program önerilecektir. İle Doc / Docx yarar Kutools for Word, bir klasördeki .doc biçimindeki tüm belgeleri kolayca .docx belgelerine dönüştürebilirsiniz. Lütfen aşağıdaki gibi deneyin.

Kutools for Word : 100'den fazla kullanışlı Word eklentisiyle, 60 gün içinde hiçbir sınırlama olmaksızın ücretsiz denemek.

1. Lütfen tüm .doc biçimindeki belgeleri belirtilen bir klasörde toplayın ve ardından Kutools Artı > Doc / Docx. Ekran görüntüsüne bakın:

2. içinde Belge Biçimi Dönüştürücü iletişim kutusu, aşağıdaki işlemleri yapmanız gerekir:

3. Ardından, size kaç belgenin başarıyla dönüştürüldüğünü söyleyen bir iletişim kutusu açılır, OK düğmesine basın ve kapatın Belge Biçimi Dönüştürücü pencere.

Artık tüm .doc biçimindeki belgeler .docx dosyalarına dönüştürülüyor. Ekran görüntüsüne bakın:

Bu yardımcı programı ücretsiz olarak denemek istiyorsanız, lütfen şu adrese gidin: yazılımı ücretsiz indirin önce ve sonra yukarıdaki adımlara göre işlemi uygulamaya gidin.

Outlook için Kutools - Outlook'a 100 Gelişmiş Özellik Getirir ve Çalışmayı Çok Daha Kolay Hale Getirir!

• Otomatik CC / BCC e-posta gönderirken kurallara göre; Otomatik İleri Özel olarak birden çok E-posta; Otomatik cevap değişim sunucusu olmadan ve daha fazla otomatik özellik ...
• BCC Uyarısı - tümünü yanıtlamaya çalıştığınızda mesaj göster posta adresiniz BCC listesindeyse; Eksik Olduğunda Hatırlatve daha fazlası özellikleri hatırlat ...
• Posta görüşmesindeki Tüm Eklerle Yanıtla (Tümü); Birçok E-postayı Yanıtla saniyeler içinde; Otomatik Karşılama Ekleme cevap verdiğinde; Konuya Tarih Ekle ...
• Ek Araçları: Tüm Postalardaki Tüm Ekleri Yönetin, Otomatik Ayır, Tümünü Sıkıştır, Tümünü Yeniden Adlandır, Tümünü Kaydet ... Hızlı Rapor, Seçili Postaları Say...
• Güçlü Önemsiz E-postalar özel olarak; Yinelenen Postaları ve Kişileri Kaldır... Outlook'ta daha akıllı, daha hızlı ve daha iyi yapmanızı sağlar.

Devamı ... Şimdi İndirin...