Ինչպե՞ս պահպանել ընթացիկ կամ յուրաքանչյուր էջը որպես առանձին Word փաստաթուղթ:

Եթե ​​ձեր Word փաստաթղթում կան բազմաթիվ էջեր, ապա այժմ պարզապես անհրաժեշտ է պահպանել միայն մեկ ընթացիկ էջ ՝ որպես նոր Word ֆայլ: Սովորաբար, դուք կարող եք պատճենել և տեղադրել ընթացիկ էջի տվյալները նոր Word ֆայլում, ապա դրանք պահպանել: Բայց այս հոդվածում ես կխոսեմ այն ​​մասին, թե ինչպես պահպանել ընթացիկ կամ յուրաքանչյուր էջը որպես Word փաստաթղթից առանձին փաստաթղթեր:

Պահեք ընթացիկ էջը որպես նոր Word փաստաթուղթ ՝ VBA կոդով

Պահեք յուրաքանչյուր էջը որպես առանձին Word փաստաթղթեր Kutools- ի համար Word- ի միջոցով

Պահեք ընթացիկ էջը որպես նոր Word փաստաթուղթ ՝ VBA կոդով

Հետևյալ VBA կոդը կարող է օգնել ձեզ պահպանել ընթացիկ էջի պարունակությունը նոր Word ֆայլում, խնդրում ենք արեք հետևյալ կերպ.

1, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներև տեղադրեք հետևյալ կոդը Մոդուլի պատուհանում:

VBA կոդ. Պահպանեք ընթացիկ էջը որպես նոր Word փաստաթուղթ.

Sub SaveCurrentPageAsANewDoc()
    Dim xDoc As Document
    Dim xNewDoc As Document
    Dim xFileName As String
    Dim xFolderPath As Variant
    Dim xDlg As FileDialog
    Set xDoc = ActiveDocument
    xFileName = InputBox("Enter file name here: ", "KuTools for Word")
    If xFileName = "" Then Exit Sub
    Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
    If xDlg.Show = -1 Then
        xFolderPath = xDlg.SelectedItems(1)
        xDoc.Bookmarks("\Page").Range.Select
        Selection.Copy
        Set xNewDoc = Documents.Add
        Selection.Paste
        xNewDoc.SaveAs xFolderPath & "\" & xFileName & ".docx"
        xNewDoc.Close
    End If
End Sub

3, Եվ հետո, սեղմեք F5 ստեղնը այս կոդն աշխատեցնելու համար, դուրս եկած երկխոսության դաշտում, խնդրում ենք մուտքագրել անուն նոր ֆայլի համար, տես նկարի նկարը.

4, Դրանից հետո կտտացրեք OK կոճակը, և երկրորդ դուրս եկած պատուհանում ընտրեք պանակ ՝ նոր ֆայլը դուրս բերելու համար, տե՛ս նկարը.

5: Սեղմեք OK կոճակը, էջի ընթացիկ բովանդակությունը պահվել է որպես նոր Word ֆայլ, արդյունքը տեսնելու համար կարող եք գնալ թղթապանակ:

Պահեք յուրաքանչյուր էջը որպես առանձին Word փաստաթղթեր Kutools- ի համար Word- ի միջոցով

Եթե ​​ցանկանում եք պահպանել ամբողջ փաստաթղթի յուրաքանչյուր էջը որպես առանձին ֆայլեր, ապա Kutools բառի համար'S պառակտում գործառույթը կարող է ձեզ լավություն բերել:

Տեղադրելուց հետո Kutools բառի համարԽնդրում ենք անել հետևյալ քայլերով.

1: Սեղմեք Kutools Plus > պառակտում, տես նկարի նկարը.

2, Մեջ Պառակտված փաստաթուղթ երկխոսության տուփ:

(1.) Ընտրեք էջ - ից Բաժանվել է բացվող ցուցակ;

(1.) Կտտացրեք նոր ֆայլերը թողարկելու համար պանակ ընտրելու կոճակ;

(2.) Եվ այնուհետև, անհրաժեշտ նախանշեք նոր պահված ֆայլերի նախածանցը:

3, Պարամետրերն ավարտելուց հետո կտտացրեք OK կոճակը ՝ պառակտումը սկսելու համար, այնուհետև Word փաստաթղթի բոլոր էջերը պահպանվել են որպես առանձին ֆայլեր հատուկ թղթապանակում, ինչպես ցույց է տրված հետևյալ նկարը

Կտտացրեք Kutools- ի Word- ի և անվճար փորձարկման համար ներբեռնելու համար:

Գրասենյակի արտադրողականության լավագույն գործիքները

Kutools բառի համար - Բարձրացրեք ձեր բառի փորձը Over-ի հետ 100 Ուշագրավ առանձնահատկություններ!

🤖 Kutools AI օգնականՓոխակերպեք ձեր գրածը AI-ի միջոցով - Ստեղծեք բովանդակություն  /  Վերաշարադրել տեքստը  /  Ամփոփել փաստաթղթերը  /  Հարցրեք տեղեկատվության համար Փաստաթղթի հիման վրա, բոլորը Word-ի շրջանակներում

📘 Փաստաթղթերի տիրապետում: Էջերի բաժանում  /  Միաձուլեք փաստաթղթերը  /  Արտահանել ընտրություն տարբեր ձևաչափերով (PDF/TXT/DOC/HTML...)  /  Խմբաքանակի փոխակերպում PDF-ի  /  Արտահանել էջերը որպես պատկերներ  /  Միանգամից մի քանի ֆայլ տպեք...

✏ Բովանդակության խմբագրում: Խմբաքանակի որոնում և փոխարինում Բազմաթիվ Ֆայլերի միջով  /  Չափափոխել բոլոր նկարները  /  Փոխադրել աղյուսակի տողերը և սյունակները  /  Աղյուսակը տեքստի վերափոխել...

🧹 Անհեշտ մաքրություն:Հեռացրու Լրացուցիչ տարածքներ  /  Բաժնի ընդմիջումներ  /  Բոլոր վերնագրերը  /  Տեքստային տուփեր  /  Hyperlinks  / Լրացուցիչ հեռացման գործիքների համար այցելեք մեր Հեռացնել խումբը...

➕ Ստեղծագործական ներդիրներՆերդիր Հազար բաժանիչներ  /  Նշեք վանդակները  /  Ռադիո կոճակներ  /  QR Code  /  Շտրիխ կոդ  /  Անկյունագծային աղյուսակ  /  Հավասարության վերնագիր  /  Նկարի վերնագիր  /  Աղյուսակի վերնագիր  /  Բազմաթիվ նկարներ  / Բացահայտեք ավելին Տեղադրեք խումբը...

🔍 Ճշգրիտ ընտրանքներ: Մատնանշել կոնկրետ էջեր  /  սեղաններ  /  ձեւավորում  /  վերնագրի պարբերություններ  / Ընդլայնել նավարկությունը ավելին Ընտրեք հատկանիշներ...

⭐ Աստղերի բարելավումներ: Արագ նավարկեք ցանկացած վայր  /  կրկնվող տեքստի ավտոմատ տեղադրում  /  անխափան անցում փաստաթղթի պատուհանների միջև  /  11 Փոխակերպման գործիքներ...

???? Ցանկանու՞մ եք փորձել այս հնարավորությունները: Kutools-ը Word-ի համար առաջարկում է ա 60 օր անվճար դատավարություն, առանց սահմանափակումների! 🚀

Անվճար ներբեռնում     Կարդալ ավելին     Գնել հիմա XNUMX