3 veidi, kā ātri izdzēst visus sadaļu pārtraukumus jūsu Word dokumentā

Šajā rakstā mēs vēlamies dalīties ar jums 3 veidos, kā ātri izdzēst visus sadaļu pārtraukumus jūsu Word dokumentā.

Sadaļu pārtraukumi ir noderīgi, veidojot vairākas sadaļas Word dokumentā. Tātad jūs varat formatēt dažādas sadaļas atšķirīgos stilos. Un šeit ir mūsu iepriekšējais raksts, lai jūs dokumentā ātri ievietotu sadaļu pārtraukumus: 3 veidi, kā ātri ievietot sadaļu pārtraukumus jūsu Word dokumentā

Tomēr dokumenta pārskatīšana, piemēram, stila maiņa, sadaļu pārdalīšana utt., Ir diezgan izplatīta. Īpaši, ja jāveic lielas korekcijas, iespējams, būs jānoņem visi sadaļu pārtraukumi. Tālāk ir norādītas 3 metodes, kuras varat izmantot, lai izdzēstu sadaļu pārtraukumus sērijā.

1. metode: atrodiet dokumentā visus sadaļu pārtraukumus

1. Vispirms nospiediet taustiņu kombināciju “Ctrl + H”, lai programmā Word atvērtu lodziņu “Atrast un aizstāt”.
2. Pēc tam ievietojiet kursoru tekstlodziņā “Atrast ko”.
3. Noklikšķiniet uz pogas “Vairāk”, lai iegūtu vairāk iespēju.
4. Pēc tam noklikšķiniet uz “Special” un izvēlnē izvēlieties “Section Break”. Tad tekstlodziņā “Atrodi ko” redzēsiet “^ b”. Tātad alternatīvs veids ir ievadīt “^ b” tieši pēc 2. darbības.
5. Visbeidzot, atstājiet lodziņu “Aizstāt ar” tukšu un noklikšķiniet uz “Aizstāt visu”. Apstiprinājuma lodziņā noklikšķiniet uz Labi.

2. metode: palaidiet makro, lai vienā dokumentā dzēstu visus sadaļu pārtraukumus

Šis ir automātiskais veids, kā atbrīvoties no visiem nevēlamajiem sadaļu pārtraukumiem.

1. Vispirms atveriet VBA redaktoru programmā Word, nospiežot “Alt + F11”.
2. Pēc tam izveidojiet jaunu moduli, noklikšķinot uz “Normal”.
3. Pēc tam noklikšķiniet uz “Ievietot” un atlasiet “Modulis”.
4. Tagad atveriet moduli ar dubultklikšķi.
5. Labajā pusē esošajā kodēšanas telpā ielīmējiet šādus kodus:

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. Visbeidzot, noklikšķiniet uz “Palaist”.

Visu sekciju pārtraukumus jūs nekur neatradīsit sekundes laikā.

3. metode: dzēsiet visus sadaļu pārtraukumus vairākos dokumentos

Līdzīgi mums ir jāpalaiž makro, ja vēlamies to izdarīt ātri un netīri.

1. Vispirms ievietojiet visus mērķa dokumentus vienā mapē.
2. Pēc tam instalējiet makro ar 2. metodes darbībām.
3. Tā vietā palaidiet šo 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. Pēc tam atvērtajā logā “Pārlūkot” atlasiet mapi, kurā saglabājat dokumentus.
5. Visbeidzot, bet ne mazāk svarīgi, noklikšķiniet uz Labi.

Sagatavojieties datu zaudēšanai

Parasti, ar labiem lietošanas ieradumiem, veiksmi un visu svētību, programmā Word var daudz sasniegt. Taču avārijas var notikt jebkurā laikā. Tāpēc ir ļoti svarīgi regulāri dublēt dokumentus. Ar dublējumu rokās jūs jutīsieties pārliecinātāki, pirms sākat darbu. docx labojums.

Autora ievads:

Vera Čena ir datu atkopšanas eksperte DataNumen, Inc., kas ir pasaules līderis datu atkopšanas tehnoloģiju, tostarp xls atgūšana un pdf programmatūras produktu labošana. Lai iegūtu vairāk informācijas, apmeklējiet vietni www.datanumen. Ar