Перейти до основного матеріалу

Як вибрати абзаци без заголовків у програмі Word?

Автор: Аманда Лі Остання зміна: 2012-08-08

Щоб задовольнити деякі вимоги, нам потрібно вибрати кілька абзаців, що не належать до заголовків. Замість вибору одного за іншим, чи є простіший спосіб виділити всі абзаци, що не належать до заголовків, одним клацанням миші. Цей посібник познайомить вас із двома методами вибору абзаців, що не належать до заголовків.

Виділіть абзаци, що не належать до заголовків, за допомогою VBA

Виділіть абзаци, що не належать до заголовків, за допомогою Kutool для Word

Рекомендовані засоби підвищення продуктивності для Word

Kutools для Word: Інтеграція ШІ 🤖, понад 100 розширених функцій заощаджують 50% часу обробки документів.Безкоштовне завантаження

Вкладка Office: представлено вкладки, подібні до браузера, у Word (та інших інструментах Office), що спрощує навігацію між кількома документами.Безкоштовне завантаження


стрілка синя права міхурВиділіть абзаци, що не належать до заголовків, за допомогою VBA

Вкладка Office: надає інтерфейси вкладок у Word, Excel, PowerPoint...
слово середнє оголошення 100
Покращте свій робочий процес зараз.      Детальніше       Безкоштовне завантаження

На щастя, ми можемо використовувати VBA для вибору абзаців без заголовків. Це простий спосіб.

Крок 1: натисніть "Alt-F11" відкрити вікно Microsoft Visual Basic для програми;

Крок 2: клацніть Модулі на Insert вкладку, скопіюйте та вставте наступний код VBA у вікно Модуль;

Крок 3: Потім натисніть прогінdoc-зворотний знак-6 , щоб застосувати VBA.

Код VBA для вибору абзаців без заголовків

Sub SelectNonHeadingParagraphs ()
Затемнена таблиця як абзац
Application.ScreenUpdating = Невірний
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Для кожної спокусливої ​​таблиці в ActiveDocument.Paragraphs
'Debug.Print tempTable.Range.Style & "" & wdStyleHeading1
Якщо tempTable.Style <> ActiveDocument.Styles (wdStyleHeading1) Тоді
'Налагодження. Друк "aaa"
tempTable.Range.Editors.Add wdEditorEveryone
End If
МАЙБУТНІ
ActiveDocument.SelectAllEditableRanges wdEditorEveryone
ActiveDocument.DeleteAllEditableRanges wdEditorEveryone
Application.ScreenUpdating = True
End Sub

Примітка: цей метод бере приклад Heading1 як приклад. Ви можете використовувати інші стилі заголовка для заміни заголовка 1. Якщо документ містить кілька стилів заголовка, цей метод не підходить


стрілка синя права міхурВиділіть усі абзаци без заголовків за допомогою Kutool для Word

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

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

Натисніть Кутулс >Вибір абзацу у групі «Вибір абзацу». Дивіться знімок екрана

doc-select-nonheading-абзаци-1

Для отримання більш детальної інформації про Виберіть абзаци без заголовка Kutools для Word, відвідайте: Вибір абзацу опис функції


Найкращі інструменти продуктивності офісу

Kutools для Word - Підніміть свій досвід Word із Over 100 Чудові особливості!

🤖 Kutools AI Assistant: змініть свій текст за допомогою ШІ - Створення вмісту  /  Переписати текст  /  Узагальнити документи  /  Звертайтеся за інформацією на основі Документа, все в Word

📘 Майстерність документів: Розділити сторінки  /  Об’єднати документи  /  Експортувати вибране в різні формати (PDF/TXT/DOC/HTML...)  /  Пакетне перетворення в PDF  /  Експортувати сторінки як зображення  /  Друк кількох файлів одночасно...

Редагування змісту: Пакетний пошук та заміна між кількома файлами  /  Змінити розмір усіх зображень  /  Транспонування рядків і стовпців таблиці  /  Перетворити таблицю в текст...

🧹 Очищення без зусиль: Змітати Зайві простори  /  Розбиття розділів  /  Усі заголовки  /  Текстові поля  /  Гіперпосилання  / Щоб отримати більше інструментів для видалення, відвідайте наш сайт Вилучити групу...

Творчі вставки: Вставити Роздільники тисяч  /  Прапорці  /  радіо кнопки  /  QR-код  /  Штрих-код  /  Таблиця діагональних ліній  /  Заголовок рівняння  /  Підпис зображення  /  Заголовок таблиці  /  Кілька зображень  / Дізнайтеся більше в Вставити групу...

???? Точність вибору: Точне визначення конкретні сторінки  /  Таблиці  /  форми  /  заголовок абзаців  / Покращте навігацію за допомогою більше Виберіть функції...

Покращення зірок: Швидка навігація до будь-якого місця  /  автоматичне вставлення повторюваного тексту  /  плавно перемикатися між вікнами документів  /  11 Інструменти перетворення...

👉 Хочете спробувати ці функції? Kutools для Word пропонує a 60-денна безкоштовна пробна версія, без обмежень! ????
 
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations