4 metodi rapidi per rimuovere interruzioni di pagina indesiderate nel documento di Word

In questo articolo, ci concentreremo sulla presentazione di 4 metodi rapidi per rimuovere le interruzioni di pagina indesiderate nei documenti Word.

Word inserisce automaticamente un'interruzione di pagina quando si passa da una pagina all'altra. Inoltre, è possibile inserire un'interruzione di pagina manuale al termine di un intervallo di testo. In questo modo, il testo riprenderà dall'inizio della pagina successiva. Per informazioni su come inserire un'interruzione di pagina manuale, consultare questo articolo: 5 modi per inserire rapidamente interruzioni di pagina nel documento di Word

Tuttavia, dovresti capire che le interruzioni di pagina automatiche sono invisibili e quindi non possono essere eliminate manualmente. Ma le interruzioni di pagina manuali inserite lo fanno. Quindi il nostro articolo ti offrirà principalmente approcci utili per rimuovere interruzioni di pagina manuali indesiderate nel documento di Word.   

Metodo 1: rimuovere manualmente le interruzioni di pagina

1. Prima di tutto, devi fare clic sul comando "Mostra/Nascondi" nella scheda "Home" per rivelare tutti i segni e i simboli nascosti nel documento in modo da poter visualizzare l'interruzione di pagina.
2. Successivamente, seleziona un'interruzione di pagina e premi "Elimina" per eliminarla.
3. Oppure puoi fare clic a sinistra di un'interruzione di pagina e quindi premere "Elimina".

Metodo 2: utilizzare la funzione "Trova e sostituisci".

1. Per cominciare, premi "Ctrl + H" per attivare la casella "Trova e sostituisci".
2. Quindi posiziona il cursore all'interno della casella di testo "Trova cosa" e fai clic sulla scheda "Altro".
3. Quindi fai clic su "Speciale" e scegli "Interruzione di pagina manuale" in quel menu.
4. Infine, lascia vuota la casella "Sostituisci con" e fai clic su "Sostituisci tutto" per rimuovere ogni interruzione di pagina nel documento.

Metodo 3: eseguire una macro per eliminare tutte le interruzioni di pagina in un documento

1. Prima di tutto, attiva l'editor VBA in Word premendo "Alt + F11".
2. Quindi fai clic sul progetto "Normale" nella colonna di sinistra.
3. Quindi fare clic su "Inserisci" nella barra dei menu e selezionare "Modulo".
4. Apri il modulo con doppio clic e incolla i seguenti codici lì:

Sub DeleteAllPageBreaksInOneDoc()
  Application.ScreenUpdating = False
 
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^m"
      .Replacement.Text = ""
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
      .Execute Replace:=wdReplaceAll
    End With
  End With
  MsgBox ("All manual page breaks in the document have been removed!")
 
  Application.ScreenUpdating = True
End Sub

5. Infine, premi "F5" per eseguire i codici.

Metodo 4: eliminare tutte le interruzioni di pagina in tutti i documenti in una cartella

Per rimuovere tutte le interruzioni di pagina in tutti i documenti in una cartella, puoi utilizzare questo metodo.

1. Per installare ed eseguire una macro, puoi fare riferimento ai passaggi del metodo 3.
2. E ricorda di sostituire con questa macro qui sotto:

Sub DeleteAllPageBreaksInAFolder()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Application.ScreenUpdating = False
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "Select a folder first!"
      Exit Sub
    End If
  End With
 
  strFile = Dir(StrFolder & "*.docx", vbNormal)
 
  While strFile <> ""
    Set objDoc = Documents.Open(FileName:=StrFolder & strFile)
 
    With Selection
      .HomeKey Unit:=wdStory
      With Selection.Find
        .ClearFormatting
        .Replacement.ClearFormatting
        .Text = "^m"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
        .Execute Replace:=wdReplaceAll
      End With
    End With
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
  Application.ScreenUpdating = True
End Sub

La macro avvierà la finestra "Sfoglia". Seleziona la cartella che contiene i documenti desiderati e fai clic su "OK" per procedere.

Preparati per il disastro dei dati

Molti di voi sono stati consapevoli della casualità della perdita di dati. Per gli utenti di Word, è anche consigliabile essere ben preparati per qualsiasi disastro di dati. E uno dei modi migliori è ottenere a riparazione docx strumento in anticipo.

Introduzione dell'autore:

Vera Chen è un'esperta di recupero dati in DataNumen, Inc., che è il leader mondiale nelle tecnologie di recupero dati, tra cui recupero xlsx and pdf riparare prodotti software. Per maggiori informazioni visita www.datanumen.com