Vai al contenuto principale

Come eliminare più pagine specifiche in un documento di Word?

In un documento di Word, puoi selezionare il contenuto della pagina corrente, quindi premere il tasto Canc per eliminare facilmente la pagina corrente. Ma, se devi rimuovere più pagine da un file Word di grandi dimensioni, come potresti risolverlo rapidamente?

Elimina un intervallo di pagine nel documento di Word con la funzione Vai a

Elimina più pagine specifiche nel documento di Word con codice VBA


Elimina un intervallo di pagine nel documento di Word con la funzione Vai a

Se desideri eliminare un intervallo di pagine consecutive da un documento di Word, la funzione Vai a può farti un favore.

1. Avvia il documento di Word che desideri eliminare le pagine.

2. Quindi premere F5 chiave per aprire il Trova e sostituisci finestra di dialogo, sotto il file Vai scheda, fare clic Pagina nel Vai a cosa casella di riepilogo, quindi immettere il numero della pagina iniziale da cui si desidera eliminare e premere entrare tasto per andare alla pagina specifica, vedi screenshot:

doc elimina più pagine 1

2. Quindi, chiudi questo Trova e sostituisci finestra di dialogo e premete F8 accendere il Modalità estesa.

3. Continua a premere F5 chiave per aprire il Trova e sostituisci finestra di dialogo, questa volta immettere il numero della pagina finale che si desidera eliminare, quindi premere entrare chiave. Tutte le pagine da 15 a 20 sono state selezionate contemporaneamente. Vedi screenshot:

doc elimina più pagine 2

4. Infine, premere Elimina direttamente per eliminare queste pagine contemporaneamente.


Elimina più pagine specifiche nel documento di Word con codice VBA

Per eliminare più pagine specifiche in un file Word che non sono consecutive, il seguente codice VBA può aiutarti.

1. Tieni premuto il ALT + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.

2. Clic inserire > Modulie incolla il codice seguente nella finestra del modulo.

Codice VBA: elimina più pagine specifiche nel file 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. Quindi, premere F5 tasto per eseguire questo codice e viene visualizzata una finestra di messaggio per ricordarti di inserire i numeri di pagina che desideri eliminare, separa i numeri di pagina con una virgola, vedi screenshot:

doc elimina più pagine 3

4. Quindi fare clic su OK pulsante, tutte le pagine specificate sono state eliminate contemporaneamente.


Seleziona più pagine specifiche e quindi cancellale contemporaneamente:

Se desideri eliminare più pagine specifiche da un documento di Word di grandi dimensioni, Kutools for Word's Seleziona Pages può aiutarti a selezionare prima le pagine di cui hai bisogno, quindi premere Elimina tasto per eliminarli immediatamente.

doc elimina più pagine 4

Kutools for Word: con più di 100 utili componenti aggiuntivi di Word, gratis da provare senza limitazioni per 60 giorni. Fare clic per scaricare e provare gratuitamente ora!

I migliori strumenti per la produttività in ufficio

Kutools for Word - Migliora la tua esperienza con le parole con Over 100 Caratteristiche notevoli!

Immergiti nelle funzionalità evidenziate di seguito o fai clic qui per esplorare tutta la potenza di Kutools per Word.

📘 Padronanza dei documenti: Pagine divise  /  Unisci documenti  /  Esporta la selezione in vari formati (PDF/TXT/DOC/XLSX)  /  Converti in batch in PDF  /  Esporta pagine come immagini  /  Stampa più file contemporaneamente ...

Modifica dei contenuti: Trova e sostituisci in batch su più file   /  Ridimensiona tutte le immagini   /  Trasporre righe e colonne della tabella  /  Converti tabella in testo ...

🧹 Pulito senza sforzoSpazza via Spazi extra  /  Interruzioni di sezione  /   Tutte le intestazioni  /  Caselle di testo  /  Collegamenti ipertestuali  /  Per ulteriori strumenti di rimozione, vai al nostro Gruppo di rimozione

Inserti creativi: inserire Mille separatori  /  Caselle di controllo  /  Pulsanti di scelta  /  QR Code  /  Codice a barre  /  Tabella della linea diagonale  /  Didascalia dell'equazione  /  Didascalia immagine  /  Didascalia  /  Immagini multiple  /  Scopri di più nel nostro Gruppo Inserisci

???? Selezioni di precisione: Individua pagine specifiche  /  con tabelle  /  forme  /  paragrafi di intestazione  /  Naviga con facilità utilizzando il nostro Seleziona gruppo

Miglioramenti delle stelle: Naviga rapidamente verso qualsiasi luogo  /  inserire automaticamente testo ripetitivo  /  passare senza problemi da una finestra all'altra del documento  /  11 strumenti di conversione ...

Trasforma le tue attività di Word con Kutools. 👉 Scarica subito con la prova di 30 giorni 🚀.

Leggi Ora       Scarica gratis      Acquista
 
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