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änsningar 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:
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.
Bästa kontorsproduktivitetsverktyg
Kutools för Outlook - Över 100 kraftfulla funktioner för att överladda din Outlook
🤖 AI Mail Assistant: Instant proffs-e-postmeddelanden med AI-magi – ett klick för geniala svar, perfekt ton, flerspråkig behärskning. Förvandla e-post utan ansträngning! ...
📧 Email Automation: Frånvaro (tillgänglig för POP och IMAP) / Schemalägg Skicka e-post / Auto CC/BCC enligt regler när du skickar e-post / Automatisk vidarebefordran (avancerade regler) / Lägg automatiskt till hälsning / Dela automatiskt e-postmeddelanden med flera mottagare i individuella meddelanden ...
📨 Email Management: Hämta enkelt e-postmeddelanden / Blockera bluff-e-postmeddelanden av ämnen och andra / Ta bort duplicerade e-postmeddelanden / Avancerad Sökning / Konsolidera mappar ...
📁 Bilagor Pro: Batch Spara / Batch lossa / Batchkomprimera / Automatisk sparning / Auto Lossa / Automatisk komprimering ...
🌟 Gränssnittsmagi: 😊 Fler vackra och coola emojis / Öka din Outlook-produktivitet med flikar / Minimera Outlook istället för att stänga ...
👍 Underverk med ett klick: Svara alla med inkommande bilagor / E-postmeddelanden mot nätfiske / 🕘Visa avsändarens tidszon ...
👩🏼🤝👩🏻 Kontakter och kalender: Lägg till kontakter i grupp från valda e-postmeddelanden / Dela upp en kontaktgrupp till individuella grupper / Ta bort påminnelser om födelsedag ...
Över 100 funktioner Vänta på din utforskning! Klicka här för att upptäcka mer.