Gå til hovedindhold

Hvordan slettes flere specifikke sider i et Word-dokument?

I et Word-dokument kan du vælge det aktuelle sideindhold og derefter trykke på Slet-tasten for let at slette den aktuelle side. Men hvis du har brug for at fjerne flere sider fra en stor Word-fil, hvordan kan du løse det hurtigt?

Slet en række sider i Word-dokument med Gå til-funktionen

Slet flere specifikke sider i Word-dokument med VBA-kode


Slet en række sider i Word-dokument med Gå til-funktionen

Hvis du vil slette en række på hinanden følgende sider fra et Word-dokument, kan funktionen Gå til gøre dig en tjeneste.

1. Start det Word-dokument, som du vil slette sider.

2. Tryk derefter på F5 nøgle til at åbne Søg og erstat under dialogboksen gå til fanebladet, klik på Side i Gå til hvad i listen, og indtast derefter det startsidesnummer, du vil slette fra, og tryk på Indtast nøgle for at gå til den specifikke side, se skærmbillede:

doc slette flere sider 1

2. Luk derefter dette Søg og erstat dialogboksen, og tryk på F8 at tænde Udvid tilstand.

3. Fortsæt med at trykke F5 nøgle til at åbne Søg og erstat dialog, denne gang skal du indtaste det sluttsidesnummer, du vil slette, og derefter trykke på Indtast nøgle. Alle sider fra 15 til 20 er valgt på én gang. Se skærmbillede:

doc slette flere sider 2

4. Til sidst skal du trykke på Slette nøgle direkte for at slette disse sider på én gang.


Slet flere specifikke sider i Word-dokument med VBA-kode

For at slette flere specifikke sider i en Word-fil, som ikke er fortløbende, kan følgende VBA-kode hjælpe dig.

1. Hold nede ALT + F11 nøgler til at åbne Microsoft Visual Basic til applikationer vindue.

2. Klik indsatte > Moduler, og indsæt følgende kode i modulvinduet.

VBA-kode: Slet flere specifikke sider i Word-fil:

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. Tryk derefter på F5 nøgle til at køre denne kode, og der vises en promptboks for at minde dig om at indtaste de sidetal, du vil slette, skal du adskille sidetallene med komma, se skærmbillede:

doc slette flere sider 3

4. Klik derefter på OK knappen, er alle de sider, du har angivet, slettet på én gang.


Vælg flere separate sider, og slet dem derefter på én gang:

Hvis du vil slette flere specifikke sider fra et stort Word-dokument, Kutools for Word's Vælg Sider funktionen kan hjælpe dig med at vælge sider, som du har brug for, og derefter trykke på Slette for at slette dem med det samme.

doc slette flere sider 4

Kutools for Word: med mere end 100 praktiske Word-tilføjelsesprogrammer, gratis at prøve uden begrænsning på 60 dage. Klik for at downloade og gratis prøveversion nu!

Bedste kontorproduktivitetsværktøjer

Kutools for Word - Forøg din Word-oplevelse med Over 100 Bemærkelsesværdige funktioner!

Dyk ned i de fremhævede funktioner nedenfor eller klik her for at udforske den fulde kraft af Kutools for Word.

📘 Dokumentbeherskelse: Opdelt sider  /  Flet dokumenter  /  Eksporter udvalg i forskellige formater (PDF/TXT/DOC/XLSX)  /  Batch Konverter til PDF  /  Eksporter sider som billeder  /  Udskriv flere filer på én gang ...

Indholdsredigering: Batch Find og erstat på tværs af flere filer   /  Ændr størrelse på alle billeder   /  Transponer tabelrækker og kolonner  /  Konverter tabel til tekst ...

🧹 Ubesværet rengøringFej væk Ekstra pladser  /  Afsnit bryder  /   Alle overskrifter  /  Tekstbokse  /  Hyperlinks  /  For flere fjernelsesværktøjer, gå til vores Fjerngruppe

Kreative indlæg: indsatte Tusind adskillere  /  Afkrydsningsfelter  /  Radio knapper  /  QR kode  /  Stregkode  /  Diagonal linjebord  /  Ligningstekst  /  Billede Caption  /  Tabeltekst  /  Flere billeder  /  Opdag mere i vores Indsæt-gruppe

???? Præcisionsvalg: Find bestemte sider  /  tabeller  /  former  /  overskrifter  /  Naviger nemt ved hjælp af vores udvalgte gruppe

Stjerneforbedringer: Naviger hurtigt til ethvert sted  /  automatisk indsæt gentagende tekst  /  skifte problemfrit mellem dokumentvinduer  /  11 Konverteringsværktøjer ...

Transformer dine Word-opgaver med Kutools. 👉 Download med 30-dages prøveversion nu 🚀.

Læs mere       Gratis download      Køb
 
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