Как удалить пустые строки и столбцы из таблиц в Word?
Пустые строки и столбцы в таблицах могут сделать ваш документ Word загроможденным и неорганизованным. Из этого туториала вы узнаете несколько способов эффективного удаления всех пустых строк и столбцов из таблиц в документе Word.
Независимо от того, предпочитаете ли вы делать это вручную, использовать код VBA или использовать решение «в один клик», эти методы помогут вам очистить таблицы и улучшить общий вид вашего документа.
Вручную удалить все пустые строки и столбцы из таблиц
В Microsoft Word нет быстрой опции удаления пустых строк и столбцов, поэтому вам придется вручную выбирать и удалять их по одному.
- Выберите пустую строку или столбец, который вы хотите удалить.
- Под Работа с таблицами, Нажмите Планировка меню.
- В Строки и столбцы группу, нажмите Удалить строки or Удалить столбцы.
Удалите все пустые строки и столбцы из таблиц с помощью кода VBA
Макрофункция Word предоставляет гораздо более удобный способ удалить все пустые строки и столбцы из таблиц в документе. Вы можете удалить все пустые строки и столбцы следующим образом.
Шаг 1: нажмите «Alt-F11» открыть окно Microsoft Visual Basic для приложений;
Шаг 2: нажмите Модули на Вставить вкладку, скопируйте и вставьте следующий код VBA в окно модуля;
Шаг 3: Затем нажмите Run 
кнопку, чтобы применить VBA.
Код VBA для удаления всех пустых строк и столбцов из таблиц:
Sub DeleteEmptyTablerowsandcolumns()
Application.ScreenUpdating = False
Dim Tbl As Table, cel As Cell, i As Long, n As Long, fEmpty As Boolean
With ActiveDocument
For Each Tbl In .Tables
n = Tbl.Columns.Count
For i = n To 1 Step -1
fEmpty = True
For Each cel In Tbl.Columns(i).Cells
If Len(cel.Range.Text) > 2 Then
fEmpty = False
Exit For
End If
Next cel
If fEmpty = True Then Tbl.Columns(i).Delete
Next i
Next Tbl
End With
With ActiveDocument
For Each Tbl In .Tables
n = Tbl.Rows.Count
For i = n To 1 Step -1
fEmpty = True
For Each cel In Tbl.Rows(i).Cells
If Len(cel.Range.Text) > 2 Then
fEmpty = False
Exit For
End If
Next cel
If fEmpty = True Then Tbl.Rows(i).Delete
Next i
Next Tbl
End With
Set cel = Nothing: Set Tbl = Nothing
Application.ScreenUpdating = True
End SubУдалите все пустые строки и столбцы из таблиц одним щелчком мыши
Kutools for Word предоставляет вам наиболее удобный способ удалить все пустые строки и столбцы из таблиц в документе. Вам просто нужно щелкнуть один раз, и Kutools for Wordс Delete Rows/Columns Утилита быстро удалит для вас все пустые строки и столбцы из всех или выбранных таблиц.
После установки Kutools for Word сделайте следующее:
1. Нажмите Кутулс Плюс > Delete Rows/Columns на Table панель.
2. Затем появится диалоговое окно, выберите область, из которой вы хотите удалить таблицы, в разделе Искать в, затем отметьте Строка вариант и Пустая строка вариант или чек Column вариант и Пустая строка вариант как вам нужно. Если вы хотите удалить все пустые строки и столбцы, вам нужно применить эту операцию дважды.
 |  |
Теперь появится диалоговое окно, напоминающее вам, сколько таблиц было обработано, нажмите OK чтобы закрыть, а пустые строки и столбцы были удалены из таблиц.
Демонстрация: удаление пустых строк и столбцов из таблиц в Word
Откройте для себя Кутулс / Кутулс Плюс вкладка в этом видео из Kutools for Word. Наслаждайтесь более чем 100 функциями и бесплатными утилитами искусственного интеллекта на постоянной основе. Скачать сейчас!
Лучшие инструменты для офисной работы
Kutools for Word - Повысьте свой опыт работы со словом с помощью Over 100 Замечательные особенности!
🤖 Kutools AI Особенности: Создать контент / Переписать текст / Документ: вопросы и ответы / Получите быстрые ответы / Перевести документы / Польский документ (сохранить формат)...
📘 Владение документами: Разделить страницы / Объединить документы / Экспортировать выбранное в различные форматы (PDF/TXT/DOC/HTML...) / Пакетное преобразование в PDF...
✏ Редактирование содержания: Пакетный поиск и замена в нескольких файлах / Изменить размер всех изображений / Транспонировать строки и столбцы таблицы / Преобразовать таблицу в текст...
🧹 Легкая очистка: Убрать Дополнительные места / Разрывы разделов / Текстовые поля / Гиперссылки / Дополнительные инструменты для снятия см. Удалить группа...
➕ Креативные вставки: Вставлять Разделители тысяч / Флажки / радио кнопки / QR код / Штрих-код / Несколько изображений / Узнайте больше в Вставить группа...
???? Точный выбор: Точно определить Конкретные страницы / таблицы / Формы / Заголовок абзацев / Улучшите навигацию с помощью больше Выберите функции...
⭐ Звездные улучшения: Перейдите в любое место / Автоматическая вставка повторяющегося текста / Переключение между окнами документов / 11 Конверсия Инструменты...
Лучшие инструменты для офисной работы
Kutools for Word - 100+ инструментов для Word
- 🤖 Kutools AI Особенности: Создайте , Перезапись, Суммировать, Переведите Документы / Получите быстрые ответы / Польский документ (сохранить формат)
- 📘 Владение документами: Разделить страницы / Объединить документы / Пакетное преобразование в PDF
- ✏ Редактирование содержания: Пакетный поиск и замена / Изменить размер всех изображений
- 🧹 Легкая очистка: Удалить лишние пробелы / Удалить разрывы разделов
- ➕ Креативные вставки: Вставить разделители тысяч / Вставьте флажки / Создание QR-кодов