Вы работаете с большим списком номенклатуры, что-то нужно удалить, что-то добавить (для удаления не забывайте пользоваться горячими клавишами ctrl+ ‘-‘). Но что делать если вы удалили не строки, а просто данные в этих строках? И осталась таблица с «пропусками». Как удалить пустые строки в Excel сразу? Как всегда есть сразу несколько способов.
Нам нужно удалить строки 7 и 3, но как правило их гораздо больше. Рассмотрим не «ручные» методы удаления.
Содержание
Как удалить пустые строки в Excel? Способ 1. Фильтр
Применяйте для нашей таблицы Автофильтр. Главная — Редактирование — Сортировка и фильтр. А затем отбирайте только пустые строки по нужному столбцу
Останутся только пустые строки. Выделяйте и удаляйте.
Способ 2. Сортировка
Способ еще проще: сортируем все ячейки по любому столбцу — пустые строки ушли.
Не забываем, что сортировать можно не только по строкам, но и по столбцам, т.е. можно удалить и пустые столбцы. Подробнее читайте здесь.
Способ 3. Выделение группы ячеек
Оригинальный метод, мне он нравится тем, что даже зная об этой возможности, я ей почти не пользуюсь, но для общего развития напишу :)
Выделяем таблицу. Переходим Главная — Редактирование — Найти и выделить — Выделение группы ячеек. В открывшемся окне выбираем Пустые ячейки.
Выделятся только пустые ячейки — правой кнопкой мыши, удалить строки или на ленте Главная — Ячейки — Удалить.
Внимание! Ячейки, содержащие формулы, пустыми считаться не будут.
Способ 4. Макрос
Как написать макрос читайте здесь. А если умеете создавать, воспользуйтесь уже готовым макросом для удаления всех пустых строк.
Sub RowDel() LastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count Application.ScreenUpdating = False For r = LastRow To 1 Step -1 If Application.Rows(r).Columns(1).Value = "" Then Rows(r).Delete Next r End Sub
Т.е. мы находим последнюю строку и циклом удаляем все строки (от последней к первой), у которых в первом столбце значение равно «», т.е. пусто. Ну и для быстроты не показываем эти вычисления (ScreenUpdating ).
Часто бывает нужно не удалить строку, а удалить ее содержимое — замените в коде
Rows(r).Delete на
Rows(r).Clear
Видимо, когда-то давно занял этот макрос на ПланетаExcel. Им отдельное спасибо за все, что они делают!
Как удалить все пустые строки ниже рабочей области?
Читайте подробно в этой статье. А если вкратце то:
Найдите последнюю ячейку в таблице, выделите первую пустую ячейку после нее (а лучше первую пустую строку), нажмите Ctrl+Shift+End. Так мы выделим все ячейки ниже рабочей таблицы. Теперь удалим их.
Пишите комментарии, если удалить пустые строки не получается.
Комментарии:
К этой записи пока нет комментариев. Возможно вы будете первым?