3 načini za hitro brisanje vseh prelomov razdelkov v Wordovem dokumentu

V tem članku želimo z vami deliti 3 načine za hitro brisanje vseh prelomov razdelkov v dokumentu Word.

Prelomi odsekov so uporabni pri ustvarjanju več odsekov v dokumentu Word. Tako lahko oblikujete različne razdelke v značilnih slogih. Tukaj je naš prejšnji članek za hitro vstavljanje prelomov razdelkov v dokument: 3 načini za hitro vstavljanje prelomov razdelkov v vaš Wordov dokument

Vendar pa je precej običajno, da dokument spremenite, na primer spremenite sloge, ponovno razdelite odseke itd. Še posebej, če je treba opraviti veliko prilagoditev, boste verjetno morali odstraniti vse prelome odsekov. Sledijo 3 metode, ki jih lahko uporabite za brisanje prelomov razdelkov v paketu.

1. način: v dokumentu poiščite vse prelome odsekov

1. Najprej pritisnite »Ctrl+ H«, da odprete polje »Najdi in zamenjaj« v Wordu.
2. Nato postavite kazalec znotraj besedilnega polja »Najdi kaj«.
3. Za več možnosti kliknite gumb »Več«.
4. Nato kliknite »Posebno« in v meniju izberite »Prelom razdelka«. Nato boste v besedilnem polju »Najdi kaj« videli »^b«. Alternativni način je torej vnos »^b« neposredno po 2. koraku.
5. Na koncu pustite polje »Zamenjaj z« prazno in kliknite »Zamenjaj vse«. V potrditvenem polju kliknite »V redu«.

2. način: Zaženite makro, da izbrišete vse prelome odsekov v enem dokumentu

Tukaj je samodejni način, kako se znebiti vseh neželenih prelomov odsekov.

1. Za začetek odprite urejevalnik VBA v Wordu tako, da pritisnete »Alt + F11«.
2. Nato ustvarite nov modul s klikom na „Normal“.
3. Nato kliknite »Vstavi« in izberite »Modul«.
4. Sedaj odprite modul z dvoklikom.
5. V kodni prostor na desni strani prilepite naslednje kode:

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. Na koncu kliknite »Zaženi«.

Vsega odmora odsekov ne boste našli nikjer v sekundi.

3. način: Izbrišite vse prelome odsekov v več dokumentih

Podobno moramo zagnati makro, če želimo to storiti na hiter in umazan način.

1. Pred vsem, vse ciljne dokumente shranite v eno mapo.
2. Nato namestite makro s koraki v 2. metodi.
3. Namesto tega zaženite ta 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. Nato v odprtem oknu »Brskaj« izberite mapo, v katero želite shraniti dokumente.
5. Nenazadnje kliknite »V redu«.

Pripravite se na izgubo podatkov

Običajno lahko z dobrimi navadami pri delu, veliko sreče in vsemi blagoslovi v Wordu dosežete veliko. Vendar pa se lahko kadar koli zgodijo napake. Zato je izjemno pomembno redno varnostno kopiranje dokumentov. Z varnostno kopijo boste bolj samozavestni, preden začnete. docx popravek.

Uvod avtorja:

Vera Chen je strokovnjakinja za obnovitev podatkov v DataNumen, Inc., ki je vodilna na svetu na področju tehnologij za obnovitev podatkov, vključno z xls izterjava in pdf popravilo programskih izdelkov. Za več informacij obiščite www.datanumen.com