Как принять в документе Word только изменения, касающиеся форматирования?

Если у вас есть документ Word с включённым отслеживанием изменений, при использовании функции Принять все изменения будут приняты все отслеживаемые правки. Однако иногда нужно принять только изменения форматирования, не затрагивая вставки или удаления. В этой статье мы расскажем, как выполнить такую задачу в документе Word.

Принятие только изменений форматирования в Word с помощью кода VBA

Принятие только изменений форматирования в Word с помощью функции «Показать исправления»

---

Принятие только изменений форматирования в Word с помощью кода VBA

Следующий код VBA позволит вам принять только изменения, касающиеся форматирования, в документе Word. Выполните следующие действия:

1. Удерживая клавиши ALT + F11, откройте окно Microsoft Visual Basic для приложений.

2. Затем нажмите Вставка > Модуль и скопируйте приведённый ниже код в открывшийся пустой модуль:

Код VBA: принятие только изменений форматирования в документе Word

Sub AcceptFormatChanges()
    Dim xRev As Revision
    For Each xRev In ActiveDocument.Revisions
        If Left(xRev.FormatDescription, 10) = "Formatted:" Then
            xRev.Accept
        End If
    Next
End Sub

3. Затем нажмите клавишу F5, чтобы запустить этот код. Все изменения форматирования в активном документе Word будут применены немедленно. См. снимок экрана:

---

Принятие только изменений форматирования в Word с помощью функции «Показать исправления»

В документе Word вы также можете воспользоваться функцией Показать исправления, чтобы выполнить эту задачу. Следуйте приведённым ниже шагам:

1. В файле с включённым режимом отслеживания изменений перейдите в раздел Рецензирование → Показать исправления, затем снимите флажки с пунктов Примечания и Вставки и удаления, оставив отмеченным пункт Форматирование. См. снимок экрана:

2. Теперь отображаются только отслеживаемые изменения форматирования. Далее нажмите Рецензирование > Принять > Принять все показанные изменения, как показано на следующем снимке экрана:

3. Теперь все изменения форматирования приняты. Верните отображение пунктов Примечания и Вставки и удаления, установив соответствующие флажки в раскрывающемся списке Показать исправления. См. снимок экрана:

4. Теперь вы видите, что изменения форматирования приняты, а остальные отслеживаемые правки по-прежнему сохранены. См. снимок экрана: