Skip i'r prif gynnwys

Sut i ddileu sawl tudalen benodol mewn dogfen Word?

Mewn dogfen Word, gallwch ddewis cynnwys cyfredol y dudalen, ac yna pwyso Delete key i ddileu'r dudalen gyfredol yn hawdd. Ond, os oes angen i chi dynnu tudalennau lluosog o ffeil Word fawr, sut allech chi ei datrys yn gyflym?

Dileu ystod o dudalennau yn nogfen Word gyda Go To feature

Dileu sawl tudalen benodol yn nogfen Word gyda chod VBA


Dileu ystod o dudalennau yn nogfen Word gyda Go To feature

Os ydych chi am ddileu ystod o dudalennau yn olynol o ddogfen Word, gall y nodwedd Go To wneud ffafr i chi.

1. Lansiwch y ddogfen Word yr ydych am ei dileu tudalennau.

2. Yna pwyswch F5 allweddol i agor y Dod o hyd ac yn ei le blwch deialog, o dan y Ewch i tab, cliciwch tudalen yn y Ewch i beth blwch rhestr, ac yna nodwch rif y dudalen gychwyn rydych chi am ddileu ohoni, a gwasgwch Rhowch allwedd i fynd i'r dudalen benodol, gweler y screenshot:

dileu tudalennau lluosog 1

2. Yna, caewch hyn Dod o hyd ac yn ei le blwch deialog, a gwasgwch F8 i droi ymlaen Ymestyn modd.

3. Ewch ymlaen i wasgu F5 allweddol i agor y Dod o hyd ac yn ei le deialog, y tro hwn, nodwch rif y dudalen ddiwedd yr ydych am ei dileu, ac yna pwyswch Rhowch allwedd. Mae'r holl dudalennau rhwng 15 ac 20 wedi'u dewis ar unwaith. Gweler y screenshot:

dileu tudalennau lluosog 2

4. O'r diwedd, pwyswch Dileu allwedd yn uniongyrchol i ddileu'r tudalennau hyn ar unwaith.


Dileu sawl tudalen benodol yn nogfen Word gyda chod VBA

I ddileu sawl tudalen benodol mewn ffeil Word nad yw'n olynol, gall y cod VBA canlynol eich helpu.

1. Daliwch i lawr y ALT + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.

Cod VBA: Dileu sawl tudalen benodol yn ffeil 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. Yna, pwyswch F5 allwedd i redeg y cod hwn, ac mae blwch prydlon yn cael ei popio allan i'ch atgoffa i nodi rhifau'r tudalennau yr ydych am eu dileu, gwahanwch rifau'r tudalennau â choma, gweler y screenshot:

dileu tudalennau lluosog 3

4. Ac yna, cliciwch OK botwm, mae'r holl dudalennau a nodwyd gennych wedi'u dileu ar unwaith.


Dewiswch sawl tudalen sepecific ac yna eu dileu ar unwaith:

Os ydych chi am ddileu sawl tudalen benodol o ddogfen Word fawr, Kutools am Word's Dewiswch Dudalennau gall nodwedd eich helpu i ddewis unrhyw dudalennau yn gyntaf yn ôl yr angen, ac yna pwyso Dileu allwedd i'w dileu ar unwaith.

dileu tudalennau lluosog 4

Kutools am Word: gyda mwy na 100 o ychwanegiadau Word defnyddiol, am ddim i geisio heb unrhyw gyfyngiad mewn 60 diwrnod. Cliciwch i Lawrlwytho a threial am ddim Nawr!

Offer Cynhyrchiant Swyddfa Gorau

Kutools am Word - Dyrchafu Eich Profiad Word gyda Dros 100 Nodweddion Rhyfeddol!

🤖 Cynorthwy-ydd Kutools AI: Trawsnewidiwch eich ysgrifennu gydag AI - Cynhyrchu Cynnwys  /  Ailysgrifennu Testun  /  Crynhoi Dogfennau  /  Ymholwch am Wybodaeth yn seiliedig ar Ddogfen, i gyd o fewn Word

📘 Meistrolaeth Dogfen: Tudalennau Hollti  /  Uno Dogfennau  /  Dewis Allforio mewn Fformatau Amrywiol (PDF/TXT/DOC/HTML...)  /  Trosi swp i PDF  /  Allforio Tudalennau fel Delweddau  /  Argraffu Ffeiliau Lluosog ar unwaith...

Golygu Cynnwys: Swp Dod o Hyd i ac Amnewid ar draws Ffeiliau Lluosog  /  Newid Maint Pob Llun  /  Trawsosod Rhesi Bwrdd a Cholofnau  /  Trosi Tabl i Testun...

🧹 Ymdrech Glân: swap i ffwrdd Mannau Ychwanegol  /  Toriadau Adran  /  Pob Pennawd  /  Blychau Testun  /  hypergysylltiadau  / Am fwy o offer tynnu, ewch i'n Dileu Grŵp...

Mewnosodiadau Creadigol: mewnosod Mil o Wahanwyr  /  Blychau Gwirio  /  Botymau Radio  /  Cod QR  /  Cod Bar  /  Tabl Llinell Lletraws  /  Pennawd Hafaliad  /  Capsiwn Delwedd  /  Pennawd Tabl  /  Lluniau Lluosog  / Darganfod mwy yn y Mewnosod Grŵp...

🔍 Detholiadau Manwl: pinbwynt tudalennau penodol  /  tablau  /  siapiau  /  paragraffau pennawd  / Gwella llywio gyda mwy Dewiswch nodweddion...

Gwelliannau Seren: Llywiwch yn gyflym i unrhyw leoliad  /  auto-mewnosod testun ailadroddus  /  toglo'n ddi-dor rhwng ffenestri dogfennau  /  11 Offer Trosi...

???? Eisiau rhoi cynnig ar y nodweddion hyn? Mae Kutools ar gyfer Word yn cynnig a Treial am ddim 60-dydd, heb unrhyw gyfyngiadau! 🚀
 
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Ciao, invece per eliminare "rapidamente" in un documento di svariate pagine (circa 100) più fogli vuoti non consecutivi è possibile?
Esiste un procedimento per eliminare i fogli vuoti, senza doverli andare a ricercare.

Grazie.
This comment was minimized by the moderator on the site
thanks. from where you learn the vba
This comment was minimized by the moderator on the site
Thanks for very helpful solutions!!!!!!!!!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations