2 brza načina za promjenu vrste prijeloma odjeljaka u vašem Word dokumentu

U ovom članku bit će dva brza načina za promjenu vrste prijeloma odjeljaka u Word dokumentu.

Najčešće korištene vrste prijeloma odjeljka u Wordu su "Sljedeća stranica" i "Kontinuirano". Umetanje prvog znači početak nove stranice za novi odjeljak. To dijeli odjeljke na jasan način. Ali kada je u pitanju ispis, bit će potrebno izdvojiti papire. Svakako, to nije ekološki prihvatljiv način. Tada možete razmisliti o korištenju "Kontinuiranog" prijeloma, koji vam može uštedjeti mnogo papira, ali možda neće dobro zadovoljiti zahtjeve za odvajanjem.

Stoga želimo predstaviti načine koje možete odabrati prema specifičnim zahtjevima.

Metoda 1: Promjena postavki stranice

1. Prvo, postavite kursor unutar ciljanog odjeljka i kliknite karticu "Izgled stranice" na vrpci.
2. Zatim kliknite gumb sa strelicom u grupi "Page Setup" da biste otvorili dijaloški okvir istog naziva.
3. Zatim kliknite karticu "Izgled" u okviru.
4. I odaberite željenu vrstu prijeloma sekcije iz kombiniranog okvira "Početak sekcije".
5. Zatim u kombiniranom okviru "Primijeni na" odaberite raspon primjene. Možete odabrati promjenu vrste prijeloma jednog odjeljka ili više njih. 

Evo ishoda:

Metoda 2: Pokrenite Word makronaredbu za promjenu vrste svih prijeloma odjeljaka u dokumentu

1. Za početak, pritisnite "Alt + F11" da biste pokrenuli VBA editor u Wordu.
2. Zatim kliknite "Normalni" projekt i kliknite karticu "Umetni" na traci izbornika.
3. Zatim odaberite "Modul" na padajućem izborniku.
4. Zatim dvaput kliknite na novi modul da biste ga otvorili.
5. Sada u prostoru za uređivanje samo zalijepite ove kodove:

Sub ChangeNextPageBreakToContinuous()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionNewPage Then
        .SectionStart = wdSectionContinuous
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

6. Pritisnite “F5” za pokretanje makronaredbe.

Ova makronaredba mijenja sve prijelome odjeljaka u vrsti "Sljedeća stranica" u "Kontinuirano". Rezultat je isti kao u metodi 1.

Sada, ako trebate promijeniti sve kontinuirane prijelome odjeljaka u vrstu "Sljedeća stranica", upotrijebite sljedeću makronaredbu:

Sub ChangeContinuousBreakToNextPageBreak()
  Dim nSectionNum As Integer
  Dim objDoc As Document
 
  Application.ScreenUpdating = False
 
  Set objDoc = ActiveDocument
  nSectionNum = objDoc.Sections.Count

  For nSectionNum = nSectionNum To 1 Step -1
    With objDoc.Sections(nSectionNum).Range.PageSetup
      If .SectionStart = wdSectionContinuous Then
        .SectionStart = wdSectionNewPage
      End If
    End With
  Next nSectionNum
 
  Application.ScreenUpdating = True
End Sub

Alat za popravak dokumenata

Nije malo vjerojatno da ćete naići na probleme s Wordom i završiti s njima oštećeni docx. Stoga morate odmah poduzeti mjere. A najbrži način za oporavak podataka je odabir kvalificiranog alata za popravak.

Uvod za autora:

Vera Chen stručnjakinja je za oporavak podataka u DataNumen, Inc., koji je svjetski lider u tehnologijama za oporavak podataka, uključujući popravak xls i pdf popraviti softverske proizvode. Za više informacija posjetite www.datanumen.com