Přejít k hlavnímu obsahu

Jak odstranit více konkrétních stránek v dokumentu Word?

V dokumentu Word můžete vybrat obsah aktuální stránky a poté stisknutím klávesy Odstranit snadno odstranit aktuální stránku. Ale pokud potřebujete odstranit více stránek z velkého souboru Word, jak to můžete rychle vyřešit?

Pomocí funkce Přejít na můžete odstranit rozsah stránek v dokumentu Word

Odstraňte více konkrétních stránek v dokumentu Word pomocí kódu VBA


Pomocí funkce Přejít na můžete odstranit rozsah stránek v dokumentu Word

Pokud chcete z dokumentu Wordu odstranit řadu po sobě jdoucích stránek, udělá vám laskavost funkce Přejít na.

1. Spusťte dokument Word, který chcete odstranit stránky.

2. Pak stiskněte tlačítko F5 klávesa pro otevření Najít a nahradit v dialogovém okně pod Přejít na klepněte na kartu Strana v Přejít na co seznamu, zadejte číslo úvodní stránky, ze které chcete odstranit, a stiskněte vstoupit klíč pro přechod na konkrétní stránku, viz screenshot:

doc smazat více stránek 1

2. Poté toto zavřete Najít a nahradit dialogové okno a stiskněte F8 zapnout Rozšířit režim.

3. Pokračujte v lisování F5 klávesa pro otevření Najít a nahradit dialogové okno, tentokrát zadejte číslo koncové stránky, které chcete odstranit, a stiskněte vstoupit klíč. Všechny stránky od 15 do 20 byly vybrány najednou. Viz snímek obrazovky:

doc smazat více stránek 2

4. Nakonec stiskněte Vymazat přímo k odstranění těchto stránek najednou.


Odstraňte více konkrétních stránek v dokumentu Word pomocí kódu VBA

Chcete-li odstranit více konkrétních stránek v souboru Word, které nenasledují za sebou, může vám pomoci následující kód VBA.

1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.

2, klikněte Vložit > Modula vložte následující kód do okna modulu.

Kód VBA: Smazání více konkrétních stránek v souboru 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. Poté stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se okno s výzvou, které vám připomene zadání čísel stránek, která chcete odstranit, oddělte čísla stránek čárkou, viz screenshot:

doc smazat více stránek 3

4. A pak klikněte OK tlačítko, všechny stránky, které jste zadali, byly smazány najednou.


Vyberte několik konkrétních stránek a poté je najednou odstraňte:

Pokud chcete odstranit více konkrétních stránek z velkého dokumentu Word, Kutools pro Word's Vyberte stránky Tato funkce vám pomůže nejprve vybrat libovolnou stránku podle potřeby a poté stisknout Vymazat klíč k jejich okamžitému smazání.

doc smazat více stránek 4

Kutools pro Word: s více než 100 užitečnými doplňky Wordu, můžete to vyzkoušet bez omezení za 60 dní. Kliknutím stáhněte a vyzkoušejte zdarma!

Nejlepší nástroje pro produktivitu v kanceláři

Kutools pro Word - Zvyšte své zkušenosti se slovem Over 100 Pozoruhodné vlastnosti!

Ponořte se do zvýrazněných funkcí níže nebo klikněte sem a prozkoumejte plnou sílu Kutools pro Word.

📘 Mistrovství dokumentů: Rozdělit stránky  /  Sloučit dokumenty  /  Exportovat výběr v různých formátech (PDF/TXT/DOC/XLSX)  /  Dávkový převod do PDF  /  Exportujte stránky jako obrázky  /  Tisk více souborů najednou ...

Úprava obsahu: Dávkové hledání a nahrazení přes více souborů   /  Změnit velikost všech obrázků   /  Transponujte řádky a sloupce tabulky  /  Převést tabulku na text ...

🧹 Čištění bez námahySmést pryč Extra prostory  /  Sekce přestávky  /   Všechny záhlaví  /  Textová pole  /  Odkazy  /  Další nástroje pro odstraňování najdete v naší skupině pro odstranění

Kreativní vložky: Vložit Tisíc separátorů  /  Zaškrtávací políčka  /  Tlačítka rádia  /  QR kód  /  čárový kód  /  Tabulka diagonálních čar  /  Titulek rovnice  /  Titulek obrázku  /  Titulek tabulky  /  Více obrázků  /  Objevte více v naší skupině Insert

???? Přesné výběry: Označte konkrétní stránky  /  Tabulky  /  Tvary  /  nadpisové odstavce  /  Procházejte se snadno pomocí naší Select Group

Vylepšení hvězd: Navigujte rychle na libovolné místo  /  automatické vkládání opakujícího se textu  /  plynule přepínat mezi okny dokumentů  /  11 Konverzní nástroje ...

Transformujte své úkoly ve Wordu pomocí Kutools. 👉 Stáhněte si nyní 30denní zkušební verzi 🚀.

Více       Stažení zdarma      Nákup
 
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