Как да премахнете празни редове и колони от таблици в Word?
Как можете да премахнете всички празни редове и колони от таблици в Word? Този урок ще ви покаже няколко начина за премахване на празни редове и колони от таблици в документ на Word.
Премахнете ръчно всички празни редове и колони от таблиците
Премахнете всички празни редове и колони от таблици с помощта на VBA код
Премахнете всички празни редове и колони от таблици с едно щракване
Премахнете ръчно всички празни редове и колони от таблиците
Microsoft Office Word не предоставя удобен начин за премахване на празни редове и колони и трябва да ги премахнете, като изберете ръчно всеки празен ред и колона и след това ги изтриете един по един.
Стъпка 1: Изберете празния ред или празната колона, които искате да изтриете. Вижте екранна снимка:
Стъпка 3: Под Маса Инструменти, щракнете върху оформление Раздел;
Стъпка 4: В Редове и колони група, щракнете върху Изтриване на редове или Изтриване на колони.
Премахнете всички празни редове и колони от таблици с помощта на VBA код
Макро функцията на Word предоставя много по-удобен начин за премахване на всички празни редове и колони от таблици в документа. Можете да премахнете всички празни редове и колони, както следва.
Стъпка 1: Натиснете „Alt-F11“ за да отворите прозореца на Microsoft Visual Basic for Application;
Стъпка 2: Кликнете върху Модули на Поставете раздел, копирайте и поставете следния VBA код в прозореца на модула;
Стъпка 3: След това щракнете бягане бутон за прилагане на VBA.
Кодът на VBA за премахване на всички празни редове и колони от таблици:
Sub DeleteEmptyTablerowsandcolumns()
Application.ScreenUpdating = False
Dim Tbl As Table, cel Като Cell, i As Long, n As Long, fEmpty As Boolean
С ActiveDocument
За всеки Tbl In .Tables
n = Tbl.Columns.Count
За i = n Към 1 Стъпка -1
fEmpty = Вярно
За всяка клетка в Tbl.Columns(i).Cells
Ако Len(cel.Range.Text) > 2 Тогава
fEmpty = False
Изход за
крайна сметка, ако
Следваща cel
If fEmpty = True Then Tbl.Columns(i).Delete
Следващ i
Следваща табл
Край с
С ActiveDocument
За всеки Tbl In .Tables
n = Tbl.Rows.Count
За i = n Към 1 Стъпка -1
fEmpty = Вярно
За всяка клетка в Tbl.Rows(i).Cells
Ако Len(cel.Range.Text) > 2 Тогава
fEmpty = False
Изход за
крайна сметка, ако
Следваща cel
If fEmpty = True Then Tbl.Rows(i).Delete
Следващ i
Следваща табл
Край с
Задайте cel = нищо: Задайте Tbl = нищо
Application.ScreenUpdating = Вярно
End Sub
Премахнете всички празни редове и колони от таблици с едно щракване
Kutools за Word ви предоставя най-удобния начин да премахнете всички празни редове и колони от таблици в документа. Просто трябва да щракнете веднъж и Kutools за Word' с Delete Rows/Columns помощната програма бързо ще премахне всички празни редове и колони от всички или избрани таблици вместо вас.
Kutools за Word, с повече от удобни функции, улеснява работата ви. | ||
След инсталиране Kutools за Word, моля, направете следното:(Безплатно изтегляне на Kutools за Word сега!)
1. кликване Kutools плюс > Delete Rows/Columns на Table панел.
2. След това се появява диалогов прозорец, изберете обхвата, от който искате да премахнете таблици, в секцията Търсене в, след което маркирайте Ред опция и Празен ред опция или проверете Колона опция и Празен ред опция, колкото ви трябва. Ако искате да изтриете всички празни редове и колони, трябва да приложите тази операция два пъти.
Сега изскача диалогов прозорец, за да ви напомни с колко маси сте работили, щракнете OK за затваряне, а празните редове и колони са премахнати от таблиците.
Демо: Премахване на празни редове и колони от таблици в Word
Най-добрите инструменти за продуктивност в офиса
Kutools за Word - Подобрете своя Word опит с Over 100 Забележителни функции!
🤖 Kutools AI Assistant: Преобразувайте писането си с AI - Генериране на съдържание / Пренаписване на текст / Обобщаване на документи / Запитване за информация въз основа на Документ, всичко това в Word
📘 Владеене на документи: Разделяне на страници / Обединяване на документи / Експортиране на селекция в различни формати (PDF/TXT/DOC/HTML...) / Пакетно конвертиране в PDF / Експортиране на страници като изображения / Отпечатайте няколко файла наведнъж...
✏ Редактиране на съдържанието: Пакетно намиране и замяна в множество файлове / Преоразмеряване на всички снимки / Транспониране на редовете и колоните на таблицата / Преобразуване на таблица в текст...
🧹 Почистване без усилие: Изметете Допълнителни пространства / Прекъсвания на раздели / Всички заглавки / Текстови полета / Хипервръзки / За повече инструменти за премахване се насочете към нашия Премахване на група...
➕ Творчески вложки: Вмъкване Хилядни разделители / Квадратчета / Радио бутони / QR Code / Баркод / Таблица с диагонални линии / Надпис на уравнение / Надпис на изображението / Надпис на таблица / Множество снимки / Открийте повече в Вмъкване на група...
🔍 Прецизни селекции: Точна точка конкретни страници / таблици / форми / заглавни параграфи / Подобрете навигацията с още Изберете функции...
⭐ Звездни подобрения: Навигирайте бързо до всяко място / автоматично вмъкване на повтарящ се текст / безпроблемно превключване между прозорците на документи / 11 Инструменти за конвертиране...