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

Hogyan lehet több konkrét oldalt törölni egy Word-dokumentumból?

Word dokumentumban kiválaszthatja az aktuális oldal tartalmát, majd a Törlés gomb megnyomásával könnyedén törölheti az aktuális oldalt. De ha el kell távolítania több oldalt egy nagy Word fájlból, hogyan oldhatná meg gyorsan?

Töröljön egy oldaltartományt a Word dokumentumból a Ugrás funkcióval

Több konkrét oldalt törölhet a VBA kóddal rendelkező Word dokumentumból


Töröljön egy oldaltartományt a Word dokumentumból a Ugrás funkcióval

Ha törölni akar egy sor egymást követő oldalt egy Word-dokumentumból, akkor a Go To funkció szívességet tehet Önnek.

1. Indítsa el a Word dokumentumot, amelyet törölni szeretne.

2. Ezután nyomja meg a gombot F5 kulcs megnyitásához Keresés és csere párbeszédpanel alatt Go To fülre kattintva oldal a Menj oda listamezőbe, majd írja be a törölni kívánt kezdőlap számát, majd nyomja meg az gombot belép gomb az adott oldalra lépéshez, lásd a képernyőképet:

doc több oldal törlése 1

2. Ezután zárja be ezt Keresés és csere párbeszédpanelt, és nyomja meg a gombot F8 bekapcsolni Hosszabbítási mód.

3. Folytassa a nyomást F5 kulcs megnyitásához Keresés és csere párbeszédpanelen ezúttal írja be a törölni kívánt végoldal számát, majd nyomja meg az gombot belép kulcs. A 15 és 20 közötti oldalakat egyszerre választotta ki. Lásd a képernyőképet:

doc több oldal törlése 2

4. Végül nyomja meg töröl közvetlenül az oldalak törléséhez.


Több konkrét oldalt törölhet a VBA kóddal rendelkező Word dokumentumból

Több, egymást nem követő oldal törléséhez a Word fájlban a következő VBA-kód segíthet.

1. Tartsa lenyomva a ALT + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.

2. Kattints betétlap > Modulok, és illessze be a következő kódot a Modul ablakba.

VBA kód: Több meghatározott oldal törlése a Word fájlból:

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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és megjelenik egy prompt doboz, amely emlékezteti Önt a törölni kívánt oldalszámok megadására, kérjük, vessze szét az oldalszámokat vesszővel, lásd a képernyőképet:

doc több oldal törlése 3

4. Ezután kattintson OK gombra, az összes megadott oldalt egyszerre törölték.


Válasszon több külön oldalt, majd törölje őket egyszerre:

Ha több specifikus oldalt szeretne törölni egy nagy Word-dokumentumból, Kutools for Word's Válassza az Oldalak lehetőséget funkció segítségével kiválaszthatja az oldalakat, ha szükséges, majd nyomja meg a gombot töröl gombot az egyszeri törléshez.

doc több oldal törlése 4

Kutools for Word: több mint 100 praktikus Word-bővítménnyel, 60 nap alatt szabadon kipróbálható korlátozás nélkül. Kattintson a letöltéshez és ingyenes próbaverzióhoz most!


Ajánlott Word-termelékenységi eszközök

 

Kutools for Word - Több mint 100 speciális szolgáltatás a Word számára, takarítson meg 50% időt

  • A bonyolult és ismételt műveletek másodpercek alatt egyszeri feldolgozást végezhetnek.
  • Egyszerre több képet illesszen be a mappákba a Word dokumentumba.
  • Egyesítsen és egyesítsen több Word-fájlt a mappák között a kívánt sorrenddel.
  • Bontja az aktuális dokumentumot külön dokumentumokká címsor, szakasz törés vagy egyéb szempontok szerint.
  • Fájlok konvertálása a Doc és a Docx, a Docx és a PDF között, a közös konverzióhoz és kiválasztáshoz szükséges eszközök gyűjteménye stb.
A megjegyzések rendezése szerint
Hozzászólások (3)
Még nincs értékelés. Legyen Ön az első, aki értékel!
A weboldal moderátora ezt a megjegyzést minimalizálta
Köszönöm a nagyon hasznos megoldásokat!!!!!!!!!!!!!
A weboldal moderátora ezt a megjegyzést minimalizálta
Kösz. honnan tanulod a vba-t
A weboldal moderátora ezt a megjegyzést minimalizálta
Ciao, invece per eliminare "rapidamente" in un documento di svariate page (körülbelül 100) più fogli vuoti non consecutivi è possibile?
Esiste un procedimento per eliminare i fogli vuoti, senza doverli andare a ricercare.

Köszönöm.
Még senki sem írt megjegyzést
Hagyja meg észrevételeit
Feladás vendégként
×
Értékeld ezt a bejegyzést:
0   Karakterek
Javasolt helyek

Kövess minket

Copyright © 2009 - www.extendoffice.com. | Minden jog fenntartva. Powered by ExtendOffice. | Oldaltérkép
A Microsoft és az Office logó a Microsoft Corporation védjegyei vagy bejegyzett védjegyei az Egyesült Államokban és / vagy más országokban.
Sectigo SSL védi