2 быстрых способа изменить тип разрывов разделов в документе Word

В этой статье вы найдете 2 быстрых способа изменить тип разрывов разделов в документе Word.

Наиболее часто используемые типы разрывов разделов в Word — это «Следующая страница» и «Непрерывный». Вставка первого типа означает начало новой страницы для нового раздела. Это позволяет четко разделить разделы. Но при печати потребуется больше бумаги. Конечно, это не самый экологичный способ. В этом случае можно рассмотреть вариант «Непрерывный», который позволит сэкономить много бумаги, но может не обеспечить достаточного разделения.

Поэтому мы хотим представить способы, которые вы можете выбрать в соответствии с конкретными требованиями.

Способ 1: изменить параметры страницы

1. Для начала поместите курсор в нужный раздел и щелкните вкладку «Макет страницы» на ленте.
2. Затем нажмите кнопку со стрелкой в ​​группе «Параметры страницы», чтобы открыть одноименное диалоговое окно.
3. Затем нажмите вкладку «Макет» в поле.
4. Выберите желаемый тип разрыва раздела из выпадающего списка «Начало раздела».
5. Затем в поле со списком «Применить к» выберите диапазон применения. Вы можете изменить тип разрыва одного или нескольких разделов. 

Вот результат:

Способ 2: запустить макрос Word, чтобы изменить тип всех разрывов разделов в документе

1. Для начала нажмите «Alt + F11», чтобы открыть редактор VBA в Word.
2. Затем нажмите «Обычный» проект и нажмите вкладку «Вставить» в строке меню.
3. Затем выберите «Модуль» в раскрывающемся меню.
4. Затем дважды щелкните новый модуль, чтобы открыть его.
5. Теперь в области редактирования просто вставьте эти коды:

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. Нажмите «F5», чтобы запустить макрос.

Этот макрос изменит все разрывы разделов в типе «Следующая страница» на «Непрерывный». Результат тот же, что и в способе 1.

Теперь, если вам нужно изменить все непрерывные разрывы разделов на тип «Следующая страница», используйте следующий макрос:

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

Инструмент для восстановления документов

Не исключено, что вы столкнетесь с проблемами Word и в конечном итоге поврежденный документ. Таким образом, вы должны принять меры немедленно. И самый быстрый способ восстановить ваши данные — это выбрать квалифицированный инструмент для восстановления.

Об авторе:

Вера Чен — эксперт по восстановлению данных в DataNumen, Inc., которая является мировым лидером в области технологий восстановления данных, включая ремонт xls и pdf ремонт программных продуктов. Для получения дополнительной информации посетите www.datanumen.com