Sut i swp-drosi ffeiliau fformat .doc i .docx yn Word?

Gan dybio eich bod wedi derbyn rhai dogfennau Word fformat 97-2003, sut allwch chi swp-drosi'r holl ddogfennau fformat .doc hyn i fformat .docx ar unwaith? Bydd yr erthygl hon yn dangos dau ddull i chi ddatrys y broblem hon.

Swp trosi ffeiliau fformat .doc i .docx gyda chod VBA
Swp trosi ffeiliau fformat .doc i .docx gyda Kutools for Word

Swp trosi ffeiliau fformat .doc i .docx gyda chod VBA

Mae'r adran hon yn mynd i ddangos y cod VBA i chi drosi'r holl ddogfennau fformat .doc mewn ffolder benodol i ddogfennau .docx ar unwaith. Gwnewch fel a ganlyn.

1. Casglwch yr holl ddogfennau fformat .doc y byddwch chi'n eu trosi i .docx mewn ffolder benodol.

2. Gwasgwch y Alt + F11 allweddol i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

3. Yn y ffenestr, cliciwch Mewnosod > Modiwlau. Yna copïwch isod god VBA i mewn i ffenestr y Modiwl.

Cod VBA: Swp troswch yr holl ddogfennau fformat .doc i .docx mewn ffolder benodol

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. Gwasgwch y F5 allwedd i redeg y cod. Yn yr agoriad Pori ffenestr, dewiswch y ffolder sy'n cynnwys y dogfennau fformat .doc a chlicio OK. Gweler y screenshot:

Yna mae'r holl ddogfennau fformat .doc yn cael eu trosi'n ddogfennau .docx yn syth fel isod dangosir y screenshot.

Swp trosi ffeiliau fformat .doc i .docx gyda Kutools for Word

Argymhellir cyfleustodau defnyddiol yn yr adran hon. Efo'r Doc / Docx cyfleustodau Kutools am Word, gallwch chi drosi'r holl ddogfennau fformat .doc mewn ffolder yn hawdd i ddogfennau .docx. Ceisiwch fel a ganlyn.

Kutools am Word : Gyda mwy na 100 o ychwanegion Word defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 60 diwrnod.

1. Casglwch yr holl ddogfennau fformat .doc mewn ffolder benodol, yna cliciwch Kutools Byd Gwaith > Doc / Docx. Gweler y screenshot:

2. Yn y Troswr Fformat Dogfen blwch deialog, mae angen i chi wneud fel a ganlyn:

3. Yna mae blwch deialog yn ymddangos i ddweud wrthych faint o ddogfennau sydd wedi'u trosi'n llwyddiannus, cliciwch y OK botwm a chau'r Troswr Fformat Dogfen ffenestr.

Nawr mae'r holl ddogfennau fformat .doc yn cael eu trosi'n ffeiliau .docx. Gweler y screenshot:

Os ydych chi am gael treial am ddim o'r cyfleustodau hwn, ewch i dadlwythwch y meddalwedd am ddim yn gyntaf, ac yna ewch i gymhwyso'r llawdriniaeth yn ôl y camau uchod.

Kutools for Outlook - Yn Dod â 100 o Nodweddion Uwch i'w Rhagweld, a Gwneud Gwaith yn Haws Osgach!

• Auto CC / BCC yn ôl rheolau wrth anfon e-bost; Auto Ymlaen E-byst Lluosog yn ôl arfer; Ymateb Auto heb weinydd cyfnewid, a nodweddion mwy awtomatig ...
• Rhybudd BCC - dangoswch neges pan geisiwch ateb popeth os yw'ch cyfeiriad post yn rhestr BCC; Atgoffwch Wrth Ymlyniadau ar Goll, a mwy o nodweddion atgoffa ...
• Ymateb (Pawb) Gyda'r Holl Atodiadau yn y sgwrs bost; Ateb Llawer o E-byst mewn eiliadau; Auto Ychwanegu Cyfarchiad wrth ateb; Ychwanegu Dyddiad i'r pwnc ...
• Offer Ymlyniad: Rheoli Pob Atodiad ym mhob Post, Datgysylltiad Auto, Cywasgu Pawb, Ail-enwi Pawb, Arbed Pawb ... Adroddiad Cyflym, Cyfrif Postiau Dethol...
• E-byst Sothach Pwerus yn ôl arfer; Tynnwch y Post a Chysylltiadau Dyblyg... Yn eich galluogi i wneud yn ddoethach, yn gyflymach ac yn well yn Outlook.

Read More ... Lawrlwytho nawr...