4 brza metoda za uklanjanje neželjenih prijeloma stranica u vašem Word dokumentu

U ovom postu ćemo se fokusirati na predstavljanje 4 brze metode za uklanjanje neželjenih prijeloma stranica u vašem Word dokumentu.

Word ubacuje automatski prelom stranice kada prelazi s jedne stranice na sljedeću. Osim toga, možete umetnuti ručni prelom stranice nakon kraja niza teksta. Tada ćete započeti tekst na vrhu sljedeće stranice. Za upute o umetnuću ručnog preloma stranice, možete pogledati ovaj članak: 5 načina da brzo umetnete prelom stranice u Word dokument

Međutim, trebali biste shvatiti da su automatski prijelomi stranica nevidljivi i stoga se ne mogu ručno izbrisati. Ali umetnuti ručni prijelomi stranica rade. Stoga će vam naš članak uglavnom ponuditi korisne pristupe uklanjanju neželjenih ručnih prijeloma stranica u Word dokumentu.   

Metoda 1: Ručno uklonite prelome stranica

1. Prije svega, morate kliknuti na komandu “Prikaži/sakrij” na kartici “Početna” da biste otkrili sve skrivene oznake i simbole u dokumentu kako biste mogli vidjeti prijelom stranice.
2. Zatim odaberite prijelom stranice i pritisnite “Delete” da biste ga se riješili.
3. Ili možete kliknuti lijevo od prijeloma stranice, a zatim pritisnuti “Delete”.

Metoda 2: Koristite funkciju „Pronađi i zamijeni“.

1. Za početak, pritisnite “Ctrl+ H” da pokrenete okvir “Pronađi i zamijeni”.
2. Zatim postavite kursor u okvir za tekst „Pronađi šta“ i kliknite na karticu „Više“.
3. Zatim kliknite na “Special” i odaberite “Manual Page Break” na tom meniju.
4. Konačno, ostavite polje "Zamijeni sa" prazno i ​​kliknite "Zamijeni sve" da biste uklonili svaki prijelom stranice u dokumentu.

Metoda 3: Pokrenite makro za brisanje svih prijeloma stranica u dokumentu

1. Prvo, pokrenite VBA editor u Wordu pritiskom na “Alt+ F11”.
2. Zatim kliknite na “Normalni” projekat na lijevoj koloni.
3. Zatim kliknite na “Insert” na traci menija i odaberite “Module”.
4. Otvorite modul dvostrukim klikom i tamo zalijepite sljedeće kodove:

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. Na kraju, pritisnite “F5” da izvršite kodove.

Metod 4: Izbrišite sve prelome stranica u svim dokumentima u fascikli

Da biste uklonili sve prijelome stranica u svim dokumentima u mapi, možete koristiti ovu metodu.

1. Da biste instalirali i pokrenuli makro, možete pogledati korake u metodu 3.
2. I ne zaboravite zamijeniti ovim makroom u nastavku:

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

Makro će pokrenuti prozor „Pregledaj“. Odaberite mapu koja sadrži vaše ciljne dokumente i kliknite „U redu“ za nastavak.

Pripremite se za katastrofu podataka

Mnogi od vas su bili svjesni slučajnosti gubitka podataka. Za korisnike Worda, također je preporučljivo da budu dobro pripremljeni za bilo kakvu katastrofu podataka. A jedan od najboljih načina je da dobijete a docx repair alat unapred.

Uvod za autora:

Vera Chen je stručnjak za oporavak podataka DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući xlsx oporavak i pdf popravak softverskih proizvoda. Za više informacija posjetite www.datanumen.com