3 spôsoby, ako rýchlo odstrániť všetky zlomy sekcií v dokumente Word

V tomto článku sa s vami chceme podeliť o 3 spôsoby, ako rýchlo odstrániť všetky zlomy sekcií v dokumente Word.

Konce sekcií sú užitočné pri vytváraní viacerých sekcií v dokumente Word. Môžete teda formátovať rôzne oddiely vo výrazných štýloch. A tu je náš predchádzajúci článok, v ktorom môžete rýchlo vložiť zalomenia sekcií do dokumentu: 3 spôsoby, ako rýchlo vložiť zlomy sekcií do dokumentu Word

Je však úplne bežné revidovať dokument, ako napríklad zmena štýlov, nové rozdelenie častí atď. Ak je potrebné vykonať veľkú úpravu, pravdepodobne budete musieť odstrániť všetky zalomenia sekcií. Nasledujú 3 spôsoby, ktoré môžete použiť na hromadné odstránenie zlomov sekcií.

Metóda 1: Nájsť všetky zalomenia sekcií v dokumente

1. Najskôr stlačením klávesov „Ctrl + H“ otvorte v programe Word políčko „Nájsť a nahradiť“.
2. Ďalej umiestnite kurzor do textového poľa „Nájsť čo“.
3. Kliknutím na tlačidlo „Viac“ získate ďalšie možnosti.
4. Potom kliknite na „Špeciálne“ a v jeho ponuke zvoľte „Zlomenie časti“. Potom sa v textovom poli „Nájsť čo“ zobrazí „^ b“. Alternatívnym spôsobom je teda zadanie „^ b“ priamo po kroku 2.
5. Nakoniec nechajte pole „Nahradiť“ prázdne a kliknite na tlačidlo „Nahradiť všetko“. V potvrdzovacom poli kliknite na „OK“.

Metóda 2: Spustenie makra na odstránenie všetkých zlomov sekcií v jednom dokumente

Toto je automatický spôsob, ako sa zbaviť všetkých nežiaducich zlomov sekcií.

1. Najskôr otvorte editor VBA v programe Word stlačením kombinácie klávesov „Alt + F11“.
2. Potom vytvorte nový modul kliknutím na „Normálny“.
3. Ďalej kliknite na „Vložiť“ a vyberte „Modul“.
4. Teraz modul otvorte dvojitým kliknutím.
5. Do kódovacieho priestoru na pravej strane vložte nasledujúce kódy:

Sub DeleteAllSectionsInOneDoc()
  With Selection
    .HomeKey Unit:=wdStory
    With Selection.Find
      .ClearFormatting
      .Replacement.ClearFormatting
      .Text = "^b"
      .Replacement.Text = ""
      .Forward = True
      .Wrap = wdFindContinue
      .Format = False
      .MatchCase = False
      .MatchWholeWord = False
      .MatchWildcards = False
      .MatchSoundsLike = False
      .MatchAllWordForms = False
    End With
    Selection.Find.Execute Replace:=wdReplaceAll
  End With
End Sub

6. Nakoniec kliknite na tlačidlo „Spustiť“.

Všetky zlomky sekcií nenájdete nikde za sekundu.

Metóda 3: Odstránenie všetkých zlomov sekcií vo viacerých dokumentoch

Podobne musíme spustiť makro, ak to chceme urobiť rýchlo a špinavo.

1. Predtým, ako všetko umiestnite do jedného priečinka, uložte všetky cieľové dokumenty.
2. Potom nainštalujte makro s krokmi v metóde 2.
3. Namiesto toho spustite toto makro:

Sub DeleteAllSectionBreaksInMultiDoc()
  Dim StrFolder As String
  Dim strFile As String
  Dim objDoc As Document
  Dim dlgFile As FileDialog
 
  Set dlgFile = Application.FileDialog(msoFileDialogFolderPicker)
 
  With dlgFile
    If .Show = -1 Then
      StrFolder = .SelectedItems(1) & "\"
    Else
      MsgBox "No folder is selected! Please select the target folder."
      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 = "^b"
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
      End With
      Selection.Find.Execute Replace:=wdReplaceAll
    End With
 
    objDoc.Save
    objDoc.Close
    strFile = Dir()
  Wend
End Sub

4. Ďalej v otvorenom okne „Prehľadávať“ vyberte priečinok, do ktorého ukladáte dokumenty.
5. V neposlednom rade kliknite na „OK“.

Pripravte sa na stratu údajov

S dobrými návykmi, šťastím a všetkým požehnaním môžete vo Worde dosiahnuť veľa. Ale kedykoľvek vás môžu postihnúť problémy. Preto je mimoriadne dôležité pravidelne zálohovať dokumenty. So zálohou po ruke budete mať väčšiu istotu pred začatím práce. docx opraviť.

Úvod autora:

Vera Chen je expertka na obnovu dát v DataNumen, Inc., ktorá je svetovým lídrom v oblasti technológií obnovy dát, vrátane xls zotavenie a pdf oprava softvérových produktov. Pre viac informácií navštívte www.datanumen. S