Как выделить в Word абзацы без заголовка?

Чтобы выполнить некоторые требования, нам нужно выделить несколько абзацев, не являющихся заголовками. Есть ли более простой способ выбрать все абзацы, не являющиеся заголовками, вместо того, чтобы выбирать один за другим, одним щелчком мыши. Это руководство познакомит вас с двумя способами выбора абзацев без заголовка.

Выберите абзацы без заголовка с помощью VBA

Выберите абзацы без заголовка с помощью Kutool for Word

---

Выберите абзацы без заголовка с помощью VBA

К счастью, мы можем использовать VBA для выбора абзацев без заголовка. Это простой способ.

Шаг 1: нажмите «Alt-F11» открыть окно Microsoft Visual Basic для приложений;

Шаг 2: нажмите Модули на Вставить вкладку, скопируйте и вставьте следующий код VBA в окно модуля;

Шаг 3: Затем нажмите Run кнопку, чтобы применить VBA.

Код VBA для выбора абзацев без заголовка

Подложка SelectNonHeadingParagraphs ()
Dim tempTable как абзац
Приложение.ScreenUpdating = False
ActiveDocument. DeleteAllEditableRanges wdEditorEveryone
Для каждой таблицы tempTable в ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading1
Если tempTable.Style <> ActiveDocument.Styles (wdStyleHeading1) Тогда
'Debug.Print "aaa"
tempTable.Range.Editors.Add wdEditorEveryone
End If
Далее
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument. DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

Примечание: в этом методе в качестве примера используется заголовок 1. Вы можете использовать другие стили заголовков для замены заголовка 1. Если документ включает несколько стилей заголовка, этот метод не подходит.

---

Выберите все абзацы без заголовка с помощью Kutool for Word

Kutool for Word - это самый удобный способ выбрать абзацы без заголовка. После того, как вы установили Kutool for Word, один щелчок мыши поможет вам завершить всю операцию.

Kutools for Word, удобная надстройка, включает группы инструментов, облегчающих вашу работу и расширяющих ваши возможности обработки текстовых документов. Бесплатная пробная версия на 45 дней! Get It Now!

Нажмите Кутулс >Выбор абзаца в группе выбора абзаца. Смотрите скриншот

Для получения более подробной информации о Выберите абзацы без заголовка Kutools for Word, пожалуйста, посетите: Выбор абзаца описание функции

---