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

Ինչպե՞ս ջնջել բազմաթիվ հատուկ էջեր Word փաստաթղթում:

Word փաստաթղթում կարող եք ընտրել ընթացիկ էջի բովանդակությունը, ապա սեղմել Deleteնջել ստեղնը ՝ ընթացիկ էջը հեշտությամբ ջնջելու համար: Բայց, եթե անհրաժեշտ է մեծ Word ֆայլից բազմաթիվ էջեր հեռացնել, ինչպե՞ս կարող եք այն արագ լուծել:

Documentնջեք մի շարք էջեր Word փաստաթղթում Go To հնարավորությամբ

VBA կոդով Word փաստաթղթում ջնջեք բազմաթիվ հատուկ էջեր


Documentնջեք մի շարք էջեր Word փաստաթղթում Go To հնարավորությամբ

Եթե ​​ցանկանում եք Word փաստաթղթից ջնջել մի շարք անընդմեջ էջեր, Go To հնարավորությունը կարող է ձեզ լավություն բերել:

1, Գործարկել Word փաստաթուղթը, որը ցանկանում եք ջնջել էջերը:

2, Դրանից հետո սեղմեք F5 բանալին բացելու համար Գտնել եւ փոխարինել երկխոսության տուփ, տակ Գնալ էջանշանը, սեղմեք էջ է Գնացեք ինչին ցուցակի տուփը, ապա մուտքագրեք մեկնարկի էջի համարը, որից ուզում եք ջնջել, և սեղմել Մտնել կոնկրետ էջ անցնելու բանալին, տես նկարի նկարը.

փաստաթուղթը ջնջել բազմաթիվ էջեր 1

2, Հետո փակիր սա Գտնել եւ փոխարինել երկխոսության տուփ և սեղմել F8 միացնել Ընդլայնել ռեժիմը.

3, Շարունակեք սեղմել F5 բանալին բացելու համար Գտնել եւ փոխարինել երկխոսություն, այս անգամ մուտքագրեք վերջնական էջի համարը, որը ցանկանում եք ջնջել, և այնուհետև սեղմել Մտնել բանալի. Միանգամից ընտրվել են 15-ից 20-ի բոլոր էջերը: Տեսեք,

փաստաթուղթը ջնջել բազմաթիվ էջեր 2

4, Վերջապես, սեղմեք ջնջել ստեղն անմիջապես այս էջերը միանգամից ջնջելու համար:


VBA կոդով Word փաստաթղթում ջնջեք բազմաթիվ հատուկ էջեր

Word ֆայլում մի քանի հատուկ էջեր ջնջելու համար, որոնք ոչ հաջորդական են, հետևյալ VBA կոդը կարող է օգնել ձեզ:

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

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

VBA կոդ. Word ֆայլում ջնջեք բազմաթիվ հատուկ էջեր.

Sub DeletePagesInDoc()
    Dim xRange As Range
    Dim xPage As String
    Dim xDoc As Document
    Dim xArr
    Dim I, xSplitCount As Long
    Application.ScreenUpdating = False
    Set xDoc = ActiveDocument
    xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _
            "use comma to separate numbers", "KuTools for Word", "")
    xArr = Split(xPage, ",")
    xPageCount = UBound(xArr)
    For I = xPageCount To 0 Step -1
        Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I)
        xDoc.Bookmarks("\Page").Range.Delete
    Next
    Application.ScreenUpdating = True
End Sub

3, Հետո, սեղմեք F5 Այս կոդը գործարկելու համար ստեղն է, և դուրս է գալիս հուշման տուփ ՝ հիշեցնելու համար, որ մուտքագրեք էջի համարները, որոնք ցանկանում եք ջնջել, առանձնացրեք էջի համարները ստորակետով, տեսեք ՝

փաստաթուղթը ջնջել բազմաթիվ էջեր 3

4, Եվ հետո, կտտացրեք OK կոճակը, ձեր նշած բոլոր էջերը միանգամից ջնջվել են:


Ընտրեք մի քանի առանձնահատուկ էջեր և այնուհետև ջնջեք դրանք.

Եթե ​​ցանկանում եք ջնջել մի քանի առանձնահատուկ էջեր Word- ի մեծ փաստաթղթից, Kutools բառի համար's Ընտրեք Էջեր առանձնահատկությունը կարող է օգնել ձեզ ընտրել նախ և առաջ անհրաժեշտ էջերը ՝ ըստ ձեզ անհրաժեշտության, ապա սեղմել ջնջել բանալին դրանք միանգամից ջնջելու համար:

փաստաթուղթը ջնջել բազմաթիվ էջեր 4

Kutools բառի համարավելի քան 100 հարմար Word հավելվածներով, 60 օրվա ընթացքում առանց սահմանափակումների անվճար փորձեք: Սեղմեք ՝ հիմա ներբեռնելու և անվճար փորձարկման համար:


Բառի արտադրողականության առաջարկվող գործիքներ

 

Kutools Word- ի համար. Word- ի ավելի քան 100 առաջադեմ առանձնահատկություններ, խնայեք ձեր 50% ժամանակը

  • Բարդ և կրկնվող գործողությունները կարող են կատարվել միանգամյա մշակմամբ վայրկյանների ընթացքում:
  • Տեղադրեք բազմաթիվ պատկերներ միանգամից թղթապանակների մեջ Word փաստաթղթում:
  • Միացրեք և միացրեք բազմաթիվ Word ֆայլեր թղթապանակների մեջ մեկում ՝ ձեր ցանկալի պատվերի հետ:
  • Ընթացիկ փաստաթուղթը բաժանեք առանձին փաստաթղթերի `ըստ վերնագրի, հատվածի ընդմիջման կամ այլ չափանիշների:
  • Փոխարկել ֆայլերը Doc- ի և Docx- ի, Docx- ի և PDF- ի միջև, ընդհանուր փոխակերպումների և ընտրության գործիքների հավաքածու և այլն ...
Տեսակավորել մեկնաբանությունները ըստ
մեկնաբանություններ (3)
Դեռևս գնահատականներ չկան: Եղիր առաջինը, ով կգնահատի:
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Շնորհակալություն շատ օգտակար լուծումների համար!!!!!!!!!!!
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
շնորհակալություն։ որտեղից ես սովորում vba-ն
Այս մեկնաբանությունը կայքի վարողի կողմից նվազագույնի է հասցվել
Ինչու՞, ներդնեք «արագընթաց» վերացնելու համար մեկ փաստաթղթերի փոփոխական էջում (մոտ 100) ոչ հետևողական, թե՞ հնարավոր է:
Esiste un procedimento per eliminare i fogli vuoti, senza doverli andare a ricercare.

Շնորհակալություն:
Առայժմ ոչ մի մեկնաբանություն չկա
Թողեք ձեր մեկնաբանությունները
Հրապարակում որպես հյուր
×
Գնահատեք այս գրառումը.
0   Անձնավորություններ
Առաջարկվող վայրեր