Прескочи на основното съдържание

Как да премахнете празни редове в Word?

Автор: Слънце Последна промяна: 2020-11-27

Документът, изтеглен от мрежата, има твърде много празни редове (ръчно прекъсване на редове). За да спестим хартия и място, трябва да премахнем всички празни редове. Има ли по-лесен начин да премахнете всички празни редове, вместо да изтривате всеки един ръчно? Този урок ще изброи три налични метода за премахване на всички празни редове в целия или избрания документ:

Премахнете всички празни редове с опцията Намери и замени

Премахнете всички празни редове с VBA

Премахнете всички празни редове с Kutools за Word


Премахнете всички празни редове с опцията Намери и замени

- Търсене и заместване функцията в Word обикновено се използва за премахване на всички празни редове, но трябва да знаете, че празните редове се извикват Ръчни прекъсвания на редове в Вижте какво опция.

1. Щракнете Сменете на Начало раздел. Вижте екранна снимка:

doc премахване на празни ръчни редове 1

2, Когато Търсене и заместване изскачащ диалогов прозорец, щракнете Повече >> бутон за показване на повече опции. И след това поставете курсора в Вижте какво поле и изберете Ръчно прекъсване на ред от Специален падащо меню, вижте екранната снимка:

doc премахване на празни ръчни редове 2

3. ще има „^l” характер в Вижте какво и щракнете върху Замести всички. Всички ръчни нови линии са изтрити наведнъж, вижте екранната снимка:

doc премахване на празни ръчни редове 3


Премахнете всички празни редове с VBA

Като алтернатива можете да използвате макрос, за да премахнете всички празни редове, ако сте добри с кода на VBA, и можете да следвате инструкциите по-долу като тези:

1, Натиснете Alt + F11 за да отворите Microsoft Visual Basic за приложение прозорец.

2. Щракнете Поставете > Модулии след това копирайте VBA кода по-долу в прозореца на модула.

VBA код: премахване на всички ръчни прекъсвания на редове в документа:

Sub Deleemptylines()
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "^l"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
.MatchFuzzy = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

3, След това кликнете Стартирайте Sub за изпълнение на кода, всички ръчни прекъсвания на редове ще бъдат премахнати.


Премахнете всички празни редове с kutools за Word

Горните методи изискват няколко стъпки за премахване на всички празни редове, но с Kutools за Word, само едно кликване ще ви помогне да завършите тази операция.

Kutools за Word : с повече от 100 удобни добавки за Word, безплатни за изпробване без ограничение за 60 дни. 

1. Моля, приложете тази помощна програма, като щракнете Kutools > Празни параграфи > Премахване на празни ръчни прекъсвания на редове. Вижте екранна снимка:

2. След това ще се появи поле за подкана, за да ви напомни да премахнете всички празни редове, моля щракнете Да бутон, вижте екранната снимка:

doc премахване на празни ръчни редове 5

3. След щракване Да, можете да видите, че всички празни редове са премахнати от документа. Вижте екранна снимка:

doc премахване на празни ръчни редове 3

Забележка: Ако просто трябва да премахнете празните редове в селекция, трябва да изберете диапазона, преди да приложите тази функция.

Щракнете, за да изтеглите Kutools за Word и безплатна пробна версия сега!


Демонстрация: Премахнете всички празни редове в Word

Kutools за Word: с повече от 100 удобни добавки за Word, безплатни за изпробване без ограничение за 60 дни. Изтеглете и изпробвайте безплатно сега!


Най-добрите инструменти за продуктивност в офиса

Kutools за Word - Подобрете своя Word опит с Over 100 Забележителни функции!

🤖 Kutools AI Assistant: Преобразувайте писането си с AI - Генериране на съдържание  /  Пренаписване на текст  /  Обобщаване на документи  /  Запитване за информация въз основа на Документ, всичко това в Word

📘 Владеене на документи: Разделяне на страници  /  Обединяване на документи  /  Експортиране на селекция в различни формати (PDF/TXT/DOC/HTML...)  /  Пакетно конвертиране в PDF  /  Експортиране на страници като изображения  /  Отпечатайте няколко файла наведнъж...

Редактиране на съдържанието: Пакетно намиране и замяна в множество файлове  /  Преоразмеряване на всички снимки  /  Транспониране на редовете и колоните на таблицата  /  Преобразуване на таблица в текст...

🧹 Почистване без усилие: Изметете Допълнителни пространства  /  Прекъсвания на раздели  /  Всички заглавки  /  Текстови полета  /  Хипервръзки  / За повече инструменти за премахване се насочете към нашия Премахване на група...

Творчески вложки: Вмъкване Хилядни разделители  /  Квадратчета  /  Радио бутони  /  QR Code  /  Баркод  /  Таблица с диагонални линии  /  Надпис на уравнение  /  Надпис на изображението  /  Надпис на таблица  /  Множество снимки  / Открийте повече в Вмъкване на група...

🔍 Прецизни селекции: Точна точка конкретни страници  /  таблици  /  форми  /  заглавни параграфи  / Подобрете навигацията с още Изберете функции...

Звездни подобрения: Навигирайте бързо до всяко място  /  автоматично вмъкване на повтарящ се текст  /  безпроблемно превключване между прозорците на документи  /  11 Инструменти за конвертиране...

👉 Искате ли да изпробвате тези функции? Kutools за Word предлага a 60-дневен безплатен пробен период, без ограничения! ????
 
Comments (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Try to replace ^l^l with this ^l
This comment was minimized by the moderator on the site
^p works if you want to remove blank lines. Just keeping this thread alive as it's still relevant.
This comment was minimized by the moderator on the site
Try finding ^p^p with ^p for paragraphs markers and ^l^l with ^l for line markers.
This comment was minimized by the moderator on the site
Thank you 'extendoffice' your solution worked for me
This comment was minimized by the moderator on the site
for my doc i needed to use the word replace function find: ^p replace with:^l
This comment was minimized by the moderator on the site
Works for me. Thank you :)
This comment was minimized by the moderator on the site
Does not work. The ^l is ignored.
This comment was minimized by the moderator on the site
Thank you, this made an assignment much easier for me!
This comment was minimized by the moderator on the site
The remove empty paragraph marks doesn't work properly.
This comment was minimized by the moderator on the site
Not working !!!!!!!!!!!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations