Note: The other languages of the website are Google-translated. Back to English

Hur batchkonverterar .doc-formatfiler till .docx i Word?

Om du antar att du har fått några Word-dokument i 97-2003-format, hur kan du konvertera alla dessa .doc-formatdokument till .docx-format på en gång? Den här artikeln visar två metoder för att lösa detta problem.

Batchkonvertera .doc-formatfiler till .docx med VBA-kod
Batchkonvertera .doc-formatfiler till .docx med Kutools för Word


Batchkonvertera .doc-formatfiler till .docx med VBA-kod

Detta avsnitt kommer att visa dig VBA-koden för att konvertera alla .doc-formatdokument i en viss mapp till .docx-dokument på en gång. Gör så här.

1. Samla alla dokument i .doc-format som du konverterar till .docx i en angiven mapp.

2. tryck på andra + F11 nyckel för att öppna Microsoft Visual Basic för applikationer fönster.

3. Klicka på i fönstret Insert > Modulerna. Kopiera sedan VBA-koden nedan till modulfönstret.

VBA-kod: Batchkonvertera alla .doc-formatdokument till .docx i en viss mapp

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. tryck på F5 för att köra koden. I öppningen Bläddra välj den mapp som innehåller dokumenten .doc-format och klicka OK. Se skärmdump:

Sedan konverteras alla .doc-formatdokument till .docx-dokument omedelbart enligt nedanstående skärmdump.


Batchkonvertera .doc-formatfiler till .docx med Kutools för Word

Ett praktiskt verktyg rekommenderas i detta avsnitt. Med Doc / Docx nytta av Kutools för Wordkan du enkelt konvertera alla .doc-formatdokument i en mapp till .docx-dokument. Försök enligt följande.

Kutools för Word : Med mer än 100 praktiska Word-tillägg, gratis att prova utan begränsning på 60 dagar.

1. Samla alla .doc-format i en angiven mapp och klicka sedan på Kutools Plus > Doc / Docx. Se skärmdump:

2. I Dokumentformatkonverterare i dialogrutan måste du göra enligt följande:

2.1) Välj den mapp som innehåller .doc-formatdokument i Mapp för källfil sektion;
2.2) Välj Konvertera doc till docx från Format Konvertera rullgardinsmeny
2.3) Som standard är Destinationsväg samma som källa kryssrutan är markerad. Om du vill placera alla konverterade .docx-dokument i samma mapp, håll bara det här alternativet valt;
Om du vill separera .docx-dokumenten och källdokumenten, avmarkera kryssrutan Destinationsväg samma som källa och välj en ny mapp för att spara .docx-dokumenten i Spara till låda;
2.4) Klicka på Start knapp. Se skärmdump:

3. Sedan dyker en dialogruta upp för att berätta hur många dokument som har konverterats framgångsrikt, klicka på OK och stäng knappen Dokumentformatkonverterare fönster.

Nu konverteras alla .doc-format till .docx-filer. Se skärmdump:

Om du vill ha en gratis testversion av det här verktyget, gå till ladda ner programvaran gratis först och sedan tillämpa operationen enligt ovanstående steg.


Kutools for Outlook - ger 100 avancerade funktioner till Outlook och gör arbetet mycket enklare!

  • Auto CC / BCC enligt regler när du skickar e-post; Automatisk vidarebefordran Flera e-postmeddelanden efter anpassning; Auto-svar utan växelserver och mer automatiska funktioner ...
  • BCC-varning - visa meddelande när du försöker svara på alla om din e-postadress finns i BCC-listan; Påminn när du saknar bilagor, och mer påminna om funktioner ...
  • Svara (alla) med alla bilagor i e-postkonversationen; Svara många e-postmeddelanden inom sekunder; Lägg automatiskt till hälsning när svar Lägg till datum i ämnet ...
  • Bilagverktyg: Hantera alla bilagor i alla e-postmeddelanden, Auto Lossa, Komprimera alla, Byt namn på alla, Spara alla ... Snabbrapport, Räkna valda mejl...
  • Kraftfulla skräppost efter anpassning; Ta bort duplicerade e-postmeddelanden och kontakter... Gör det möjligt för dig att göra smartare, snabbare och bättre i Outlook.
shot kutools outlook kutools flik 1180x121
shot kutools outlook kutools plus flik 1180x121