Jak hromadně převádět soubory ve formátu .doc na .docx v aplikaci Word?
Za předpokladu, že jste obdrželi nějaké dokumenty Wordu ve formátu 97-2003, jak můžete hromadně převést všechny tyto dokumenty ve formátu .doc do formátu .docx najednou? Tento článek vám ukáže dvě metody řešení tohoto problému.
Dávkový převod souborů ve formátu .doc do .docx pomocí kódu VBA
Dávkově převádějte soubory ve formátu .doc do .docx pomocí Kutools pro Word
Dávkový převod souborů ve formátu .doc do .docx pomocí kódu VBA
Tato část vám ukáže kód VBA pro převod všech dokumentů ve formátu .doc v určené složce na dokumenty .docx najednou. Postupujte prosím následovně.
1. Shromážděte prosím všechny dokumenty ve formátu .doc, které převedete do .docx, v určené složce.
2. zmáčkni Další + F11 klávesa pro otevření Microsoft Visual Basic pro aplikace okno.
3. V okně klikněte na Vložit > Modul. Poté zkopírujte níže uvedený kód VBA do okna modulu.
Kód VBA: Dávkový převod všech dokumentů ve formátu .doc do .docx v určité složce
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. zmáčkni F5 klíč ke spuštění kódu. V otvoru Procházet v okně vyberte složku obsahující dokumenty ve formátu .doc a klikněte na OK. Viz snímek obrazovky:
Poté jsou všechny dokumenty ve formátu .doc okamžitě převedeny na dokumenty .docx, jak je uvedeno níže.
Dávkově převádějte soubory ve formátu .doc do .docx pomocí Kutools pro Word
V této části bude doporučen užitečný nástroj. S Doc / Docx užitečnost Kutools pro Word, můžete snadno převést všechny dokumenty ve formátu .doc ve složce na dokumenty .docx. Zkuste to prosím následovně.
Kutools pro Word : S více než 100 užitečnými doplňky Wordu, zdarma k vyzkoušení bez omezení 60 dny.
1. Shromážděte prosím všechny dokumenty ve formátu .doc do určené složky a klikněte na Kutools Plus > Doc / Docx. Viz snímek obrazovky:
2. V Převaděč formátu dokumentu dialogové okno, musíte postupovat následovně:
3. Poté se zobrazí dialogové okno s informacemi o tom, kolik dokumentů bylo úspěšně převedeno, klepněte na ikonu OK tlačítko a zavřete Převaděč formátu dokumentu okno.
Nyní jsou všechny dokumenty ve formátu .doc převedeny na soubory .docx. Viz screenshot:
Chcete-li mít bezplatnou zkušební verzi tohoto nástroje, přejděte na software si stáhněte zdarma nejprve a poté přejděte k použití operace podle výše uvedených kroků.
Nejlepší nástroje pro produktivitu v kanceláři
Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook
🤖 AI Mail Assistant: Okamžité profesionální e-maily s magií umělé inteligence – jedním kliknutím získáte geniální odpovědi, perfektní tón, vícejazyčné ovládání. Transformujte e-maily bez námahy! ...
???? Automatizace e-mailu: Mimo kancelář (k dispozici pro POP a IMAP) / Naplánujte odesílání e-mailů / Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu / Automatické přeposílání (pokročilá pravidla) / Automatické přidání pozdravu / Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...
📨 Email management: Snadné vyvolání e-mailů / Blokujte podvodné e-maily podle předmětů a dalších / Odstranit duplicitní e-maily / pokročilé vyhledávání / Konsolidovat složky ...
📁 Přílohy Pro: Dávkové uložení / Dávkové odpojení / Dávková komprese / Automaticky uložit / Automatické odpojení / Automatické komprimování ...
???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů / Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami / Minimalizujte aplikaci Outlook namísto zavírání ...
???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami / E-maily proti phishingu / 🕘Zobrazit časové pásmo odesílatele ...
👩🏼🤝👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů / Rozdělit skupinu kontaktů na jednotlivé skupiny / Odeberte připomenutí narozenin ...
Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.