Note: The other languages of the website are Google-translated. Back to English

Как удалить все пустые абзацы в Word?

Если документ охватывает 200 страниц с сотнями пустых абзацев, удаление всех пустых абзацев один за другим будет болезненным. Как быстро и эффективно удалить все пустые абзацы? Потратьте несколько минут на просмотр этого руководства, и вы найдете ответ.

Удалите все пустые абзацы с помощью функции поиска и замены

Удалите все пустые абзацы с помощью VBA

Удалите все пустые абзацы с помощью Kutools for Word


стрелка синий правый пузырь Удалите все пустые абзацы с помощью функции поиска и замены

Удивительный! Используйте эффективные вкладки в Word (Office), например Chrome, Firefox и New Internet Explorer!

Подробнее Скачать бесплатно

Никто не любит тратить много времени на удаление всех пустых абзацев один за другим. Функция «Найти и заменить» в Word обычно используется, если мы знаем, что символ пустого абзаца может быть найден как Метка абзаца в поле «Найти».

1. Нажмите Главная > Замените чтобы включить эту утилиту.

2. Нажмите Подробнее >> кнопку, чтобы открыть дополнительные параметры. См. Снимок экрана ниже:

3. Поместите курсор в Найдите то, что поле и выберите Знак абзаца из Особый выпадающее меню;

4. После выбора Знаки абзаца, там будет "^pЗнак, отображаемый в Найдите то, что поле.

5. Войти "^p" сделать "^ Р ^ рНайдите то, что поле и нажмите Заменить все.

Ноты:

"^p”Удалит не только все пустые абзацы, но и все знаки абзацев в документах, чтобы оставить весь текст слишком близко к одному абзацу.

"^ Р ^ р»Удалит только все пустые абзацы (метки пустых абзацев).


стрелка синий правый пузырь Удалите все пустые абзацы с помощью VBA

Если вы хотите использовать макрос для работы с текстовым документом, также доступен код VBA для удаления всех пустых абзацев в слове.

1. Нажмите «Alt-F11”, Чтобы открыть Microsoft Visual Basic для приложений окно.

2. Нажмите Модули на Вставить вкладку, скопируйте и вставьте следующий код VBA в Модули окно.

Код VBA для удаления пустых абзацев:

Sub Deleemptyparagraphs ()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
С Selection.Find
.Text = "^ p ^ p"
.Replacement.Text = ""
.Вперед = Истина
.Wrap = wdFindContinue
.Format = Ложь
.MatchCase = False
.MatchWholeWord = Ложь
.MatchByte = Ложь
.MatchAllWordForms = Ложь
.MatchSoundsLike = Ложь
.MatchWildcards = False
.MatchFuzzy = Ложь
Конец с
Selection.Find.Execute Заменить: = wdReplaceAll
End Sub

4. Нажмите Запустить макрос на вкладке «Выполнить».


стрелка синий правый пузырь Удалите все пустые абзацы с помощью kutools for Word

Чтобы удалить все пустые абзацы в слове, встроенная функция требует нескольких шагов, а макрос кажется слишком сложным для понимания. Есть ли более простой способ помочь нам быстро удалить все пустые абзацы в слове? Да, Kutools for Word ваше лучшее решение.

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

1. Пожалуйста, примените эту утилиту, нажав Кутулс > Пустые параграфы > Удалить метки пустых абзацев. Смотрите скриншот:

2. После нажатия Удалить метки пустых абзацев, все пустые абзацы будут удалены из всего документа.

Внимание: Если вы просто хотите удалить пустые абзацы из выбранной части документа, Kutools for Word также может вам помочь, пожалуйста, прочтите дополнительную информацию из здесь.



Рекомендуемые инструменты для повышения производительности Word

 

Kutools For Word - Более 100 расширенных функций для Word, сэкономьте 50% времени

  • Сложные и повторяющиеся операции можно производить разово за секунды.
  • Вставляйте сразу несколько изображений из папок в документ Word.
  • Объединяйте и объединяйте несколько файлов Word из папок в одну в желаемом порядке.
  • Разделите текущий документ на отдельные документы в соответствии с заголовком, разрывом раздела или другими критериями.
  • Преобразование файлов между Doc и Docx, Docx и PDF, набор инструментов для общих преобразований и выбора и т. Д.
Сортировать комментарии по
Комментарии (7)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Ваши первые 2 предложения не работают, я попробовал оба и получил большой документ всего в один абзац. Оба варианта удалили ВСЕ абзацы. Я не знаю, пытаетесь ли вы просто продать программу, которую рекомендовали, или что, но ваши первые два предложения не работают, как вы утверждаете. Я не знаю, повезло ли кому-нибудь еще, но у меня они не сработали, хорошо, что я могу исправить этот беспорядок.
Этот комментарий был сведен к минимуму модератором на сайте
Попробуйте использовать CTRL+SHIFT+8
Этот комментарий был сведен к минимуму модератором на сайте
Найдите что: ^p^p Замените на: ^p
Этот комментарий был сведен к минимуму модератором на сайте
Более простое решение — просто использовать CTRL+SHIFT+8.
Этот комментарий был сведен к минимуму модератором на сайте
Поиск/замена работает нормально... если только пустой абзац не является первым абзацем ячейки в таблице. Первые абзацы не являются проблемой в тексте, вы можете искать разрывы разделов и страниц, за которыми следует абзац, ячейки и текстовые поля являются проблемой. К сведению: CTRL+SHIFT+8 просто отключает отображение меток абзаца, а не удаляет пустые абзацы.
Этот комментарий был сведен к минимуму модератором на сайте
Большое спасибо. Я делал все это вручную в документе объемом 137,000 XNUMX слов. Вы спасли мой рассудок, помогая мне сделать все сразу. Будьте здоровы.
Этот комментарий был сведен к минимуму модератором на сайте
чтобы удалить пустой абзац, просто используйте это:


Найдите ^p^p и замените на ^p


ИЛИ, если вы хотите сделать иначе, найдите ^p и замените на ^p^p
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL