3 способи швидкого видалення всіх розривів розділів у вашому документі Word

У цій статті ми хочемо поділитися з вами 3 способами швидкого видалення всіх розривів розділів у вашому документі Word.

Розриви розділів корисні при створенні декількох розділів у документі Word. Таким чином, ви можете форматувати різні розділи у виразних стилях. І ось наша попередня стаття, щоб ви швидко вставили розриви розділів у документ: 3 способи швидкого вставлення розривів розділів у ваш документ Word

Однак досить часто переглядається документ, такий як зміна стилів, повторне розділення розділів і т. Д. Зокрема, якщо потрібно зробити велике коригування, можливо, вам доведеться видалити всі розриви розділів. Нижче наведено 3 методи, якими ви можете видалити розриви розділів у пакеті.

Спосіб 1: Знайдіть усі розриви розділів у документі

1. Перш за все, натисніть “Ctrl + H”, щоб відкрити вікно “Знайти та замінити” у програмі Word.
2. Потім поставте курсор всередину текстового поля "Знайти що".
3. Натисніть кнопку «Більше», щоб отримати більше можливостей.
4. Потім натисніть «Спеціальне» та виберіть «Розбиття розділу» в його меню. Тоді ви побачите “^ b” у текстовому полі “Знайти що”. Отже, альтернативним способом є введення “^ b” безпосередньо після кроку 2.
5. Нарешті, залиште поле «Замінити на» порожнім і натисніть «Замінити все». Натисніть “OK” у полі підтвердження.

Спосіб 2: Запустіть макрос, щоб видалити всі розриви розділів в одному документі

Ось автоматичний спосіб позбутися всіх небажаних розривів розділів.

1. Для початку відкрийте редактор VBA у програмі Word, натиснувши “Alt + F11”.
2. Потім створіть новий модуль, натиснувши “Звичайний”.
3. Потім натисніть «Вставити» та виберіть «Модуль».
4. Тепер відкрийте модуль подвійним клацанням.
5. У простір кодування з правого боку вставте такі коди:

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. Нарешті, натисніть «Виконати».

Всі розриви розділів ви не знайдете ніде за секунду.

Метод 3: Видалити всі розриви розділів у кількох документах

Так само ми повинні запустити макрос, якщо хочемо зробити це швидко і брудно.

1. Перш за все, помістіть усі цільові документи в одну папку.
2. Потім встановіть макрос із кроками у способі 2.
3. Замість цього запустіть цей макрос:

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. Далі у вікні “Огляд” відкрийте папку, до якої ви зберігаєте документи.
5. І останнє, але не менш важливе, натисніть “OK”.

Підготуйтеся до втрати даних

Зазвичай, маючи гарні навички роботи, удачу та всілякі благословення, ви можете багато чого досягти у Word. Але збої можуть трапитися будь-коли. Тому вкрай важливо регулярно створювати резервні копії документів. Маючи резервну копію, ви будете впевненішими перед початком роботи. docx виправлення.

Вступ автора:

Віра Чень є експертом з відновлення даних у DataNumen, Inc., яка є світовим лідером у галузі технологій відновлення даних, в тому числі відновлення XLS та pdf ремонт програмних продуктів. Для отримання додаткової інформації відвідайте WWW.datanumen.com