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

Hoe verwijder ik meerdere specifieke pagina's in een Word-document?

In een Word-document kunt u de huidige pagina-inhoud selecteren en vervolgens op de Delete-toets drukken om de huidige pagina gemakkelijk te verwijderen. Maar als u meerdere pagina's uit een groot Word-bestand moet verwijderen, hoe kunt u dit dan snel oplossen?

Verwijder een reeks pagina's in Word-document met de functie Ga naar

Verwijder meerdere specifieke pagina's in Word-document met VBA-code


Verwijder een reeks pagina's in Word-document met de functie Ga naar

Als u een reeks opeenvolgende pagina's uit een Word-document wilt verwijderen, kan de functie Ga naar u een plezier doen.

1. Start het Word-document waarvan u pagina's wilt verwijderen.

2. Druk vervolgens op F5 sleutel om het te openen Zoeken en vervangen dialoogvenster onder het gaan naar tab, klik Pagina functie in het Ga naar wat keuzelijst, voer vervolgens het startpaginanummer in waaruit u wilt verwijderen, en druk op Enter toets om naar de specifieke pagina te gaan, zie screenshot:

doc meerdere pagina's verwijderen 1

2. Sluit dit dan Zoeken en vervangen dialoogvenster en druk op F8 om de Breid de modus uit.

3. Blijf drukken F5 sleutel om het te openen Zoeken en vervangen Voer dit keer het nummer van de eindpagina in dat u wilt verwijderen en druk vervolgens op Enter sleutel. Alle pagina's van 15 tot 20 zijn in één keer geselecteerd. Zie screenshot:

doc meerdere pagina's verwijderen 2

4. Druk ten slotte op Verwijder toets rechtstreeks om deze pagina's in één keer te verwijderen.


Verwijder meerdere specifieke pagina's in Word-document met VBA-code

Om meerdere specifieke pagina's in een Word-bestand te verwijderen die niet opeenvolgend zijn, kan de volgende VBA-code u helpen.

1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic voor toepassingen venster.

2. Klikken Invoegen > Moduleen plak de volgende code in het modulevenster.

VBA-code: verwijder meerdere specifieke pagina's in Word-bestand:

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. Druk vervolgens op F5 toets om deze code uit te voeren, en er verschijnt een promptvenster om u eraan te herinneren de paginanummers in te voeren die u wilt verwijderen, scheid de paginanummers door komma's, zie screenshot:

doc meerdere pagina's verwijderen 3

4. En klik dan OK knop, zijn alle pagina's die u heeft opgegeven in één keer verwijderd.


Selecteer meerdere afzonderlijke pagina's en verwijder ze in één keer:

Als u meerdere specifieke pagina's uit een groot Word-document wilt verwijderen, Kutools for Word's Selecteer Pagina's functie kan u helpen om eerst de gewenste pagina's te selecteren en vervolgens op te drukken Verwijder toets om ze in één keer te verwijderen.

doc meerdere pagina's verwijderen 4

Kutools for Word: met meer dan 100 handige Word-invoegtoepassingen, gratis te proberen zonder beperking in 60 dagen. Klik om te downloaden en probeer nu gratis!


Aanbevolen Word-productiviteitstools

 

Kutools For Word - Meer dan 100 geavanceerde functies voor Word, bespaar 50% tijd

  • Ingewikkelde en herhaalde bewerkingen kunnen een eenmalige verwerking in seconden worden uitgevoerd.
  • Voeg meerdere afbeeldingen in verschillende mappen tegelijk in een Word-document in.
  • Voeg meerdere Word-bestanden in mappen samen en combineer ze tot één met de door u gewenste volgorde.
  • Splits het huidige document in afzonderlijke documenten op basis van koptekst, sectie-einde of andere criteria.
  • Converteer bestanden tussen Doc en Docx, Docx en PDF, verzameling tools voor algemene conversies en selectie, enzovoort ...
Heb je vragen? Stel ze hier. (3)
Nog geen beoordelingen. Beoordeel als eerste!
Deze opmerking is gemaakt door de moderator op de site
Bedankt voor zeer nuttige oplossingen!!!!!!!!!!!!!
Deze opmerking is gemaakt door de moderator op de site
bedankt. van waar je de vba . leert
Deze opmerking is gemaakt door de moderator op de site
Ciao, invece per eliminare "rapidamente" in un documento di svariate page (circa 100) più fogli vuoti non consecutivi è possibile?
Maak een procedure per eliminare i fogli vuoti, senza doverli andare a ricercare.

Dank u.
Er zijn nog geen reacties geplaatst
Laat uw commentaar
Posten als gast
×
Beoordeel dit bericht:
0   Personages
Voorgestelde locaties

Volg ons

Copyright © 2009 - www.extendoffice.com. | Alle rechten voorbehouden. Aangedreven door ExtendOffice. | Sitemap
Microsoft en het Office-logo zijn handelsmerken of gedeponeerde handelsmerken van Microsoft Corporation in de Verenigde Staten en / of andere landen.
Beschermd door Sectigo SSL