Удаление строки в excel автоматически

При импорте и копировании таблиц в Excel могут формироваться пустые строки и ячейки. Они мешают работе, отвлекают.

Некоторые формулы могут работать некорректно. Использовать ряд инструментов в отношении не полностью заполненного диапазона невозможно. Научимся быстро удалять пустые ячейки в конце или середине таблицы. Будем использовать простые средства, доступные пользователю любого уровня.

Как в таблице Excel удалить пустые строки?

Чтобы показать на примере, как удалить лишние строки, для демонстрации порядка действий возьмем таблицу с условными данными:

Пример 1. Сортировка данных в таблице. Выделяем всю таблицу. Открываем вкладку «Данные» — инструмент «Сортировка и фильтр» — нажимаем кнопку «Сортировка». Или щелкаем правой кнопкой мыши по выделенному диапазону и делаем сортировку «от минимального к максимальному».

Пустые строки после сортировки по возрастанию оказываются внизу диапазона.

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

Пример 2. Фильтр. Диапазон должен быть отформатирован как таблица с заголовками. Выделяем «шапку». На вкладке «Данные» нажимаем кнопку «Фильтр» («Сортировка и фильтр»). Справа от названия каждого столбца появится стрелочка вниз. Нажимаем – открывается окно фильтрации. Снимаем выделение напротив имени «Пустые».

Таким же способом можно удалить пустые ячейки в строке Excel. Выбираем нужный столбец и фильтруем его данные.

Пример 3. Выделение группы ячеек. Выделяем всю таблицу. В главном меню на вкладке «Редактирование» нажимаем кнопку «Найти и выделить». Выбираем инструмент «Выделение группы ячеек».

В открывшемся окне выбираем пункт «Пустые ячейки».

Программа отмечает пустые ячейки. На главной странице находим вкладку «Ячейки», нажимаем «Удалить».

Результат – заполненный диапазон «без пустот».

Внимание! После удаления часть ячеек перескакивает вверх – данные могут перепутаться. Поэтому для перекрывающихся диапазонов инструмент не подходит.

Полезный совет! Сочетание клавиш для удаления выделенной строки в Excel CTRL+«-». А для ее выделения можно нажать комбинацию горячих клавиш SHIFT+ПРОБЕЛ.



Как удалить повторяющиеся строки в Excel?

Чтобы удалить одинаковые строки в Excel, выделяем всю таблицу. Переходим на вкладку «Данные» — «Работа с данными» — «Удалить дубликаты».

В открывшемся окне выделяем те столбцы, в которых находятся повторяющиеся значения. Так как нужно удалять повторяющиеся строки, то должны быть выделены все столбцы.

После нажатия ОК Excel формирует мини-отчет вида:

Как удалить каждую вторую строку в Excel?

Проредить таблицу можно с помощью макроса. Например, такого:

А можно ручками. Предлагаем простенький способ, доступный каждому пользователю.

1. В конце таблицы делаем вспомогательный столбец. Заполняем чередующимися данными. Например, «о у о у о у» и т.д. Вносим значения в первые четыре ячейки. Потом выделяем их. «Цепляем» за черный крестик в правом нижнем углу и копируем буквы до конца диапазона.



2. Устанавливаем «Фильтр». Отфильтровываем последний столбец по значению «у».



3. Выделяем все что осталось после фильтрации и удаляем.



4. Убираем фильтр – останутся только ячейки с «о».

Вспомогательный столбец можно устранить и работать с «прореженной таблицей».

Как удалить скрытые строки в Excel?

Однажды пользователь скрыл некую информацию в строках, чтобы она не отвлекала от работы. Думал, что впоследствии данные еще понадобятся. Не понадобились – скрытые строки можно удалить: они влияют на формулы, мешают.

В тренировочной таблице скрыты ряды 5, 6, 7:

Будем их удалять.

1. Переходим на «Файл»-«Сведения»-«Поиск проблем» — инструмент «Инспектор документов».



2. В отрывшемся окне ставим галочку напротив «Скрытые строки и столбцы». Нажимаем «Проверить».



3. Через несколько секунд программа отображает результат проверки.



4. Нажимаем «Удалить все». На экране появится соответствующее уведомление.

В результате проделанной работы скрытые ячейки удалены, нумерация восстановлена.

Таким образом, убрать пустые, повторяющиеся или скрытые ячейки таблицы можно с помощью встроенного функционала программы Excel.

Удаляем в MS EXCEL пустые строки в таблице

​Смотрите также​сам я в​ кнопку «Найти и​Вставка — Функция (Insert​ рабочим диапазонам имена,​ на вкладку «Данные»​ условию, существуют алгоритмы​ нужно удалить, согласно​ После этого следует​ интересующие нас значения​

​ таблице имеются пустые​Shift​ помощью инструментов на​. Жмем на кнопку​ личных приоритетов пользователя.​

​ не содержат формулы.​ наступить необходимость удалить​Часто, особенно при импорте​ VBA не силён),​ выделить» и выбираем​ — Function)​ используя​

Сортировка

​ — «Работа с​ действий, которые значительно​ условному форматированию. В​ нажать на кнопку​ будут располагаться вместе.​​ элементы, расположенные в​​. Кликаем левой кнопкой​ ленте, которые размещены​«Копировать»​Урок:​Выделяем диапазон, который собираемся​ пустые ячейки. Они​

​ данных в EXCEL,​ мне до этого​ пункт «Выделение группы​или жмем на кнопку​Диспетчер Имен (Name Manager)​ данными» — «Удалить​ облегчают задачу пользователям​ нашем случае это​«OK»​После того, как​ строке, которая содержит​

​ мышки по первому​ во вкладке​, которая размещена во​Условное форматирование в Excel​ обрабатывать. Находясь во​ зачастую являются ненужным​ на листе могут​ попадалась подобная конструкция​ ячеек». В появившемся​

Фильтр

​Вставить функцию​на вкладке​ дубликаты».​ и экономят их​ розовый цвет. В​.​ настройка в данном​ какие-то данные, как​ номеру строки диапазона,​«Главная»​

Выделение группы ячеек

​ вкладке​Урок:​ вкладке​ элементом и только​

• ​ формироваться таблицы с​​ на удаление строк,​​ диалоговом окне «Выделение​
• ​(Insert Function)​Формулы (Formulas)​В открывшемся окне выделяем​ время. К таким​

• ​ поле​Таким образом, строки, содержащие​

• ​ окне выполнена, жмем​ на изображении ниже,​ который следует удалить.​
• ​.​«Главная»​Сортировка и фильтрация данных​

​«Главная»​ увеличивают общий массив​ ПОЛНОСТЬЮ пустыми строками.​но при запуске​ группы ячеек» включаем​на вкладке​или — в​ те столбцы, в​ инструментам относится окно​«Порядок»​ значения, с которых​ на кнопку​ этот способ применять​ Затем зажимаем клавишу​Производим выделение в любом​в блоке инструментов​ в Excel​

​, жмем на пиктограмму​
​ данных, чем запутывают​ Научимся быстро удалять​ вываливалась ошибка ругаясь​ опцию «Пустые ячейки»​Формулы (Formulas)​ Excel 2003 и​

excel2.ru

Удаление пустых ячеек в Microsoft Excel

​ которых находятся повторяющиеся​ выделения группы ячеек,​выбираем, где будут​ вы сняли галочки,​«OK»​ нельзя. Его использование​Shift​ месте строчки, которую​«Буфер обмена»​Кроме того, убрать пустые​«Условное форматирование»​

​ пользователя. Определим способы,​ эти ненужные строки,​

Алгоритмы удаления

​ на выполнение этого​ и нажимаем кнопку​в новых версиях​ старше — меню​ значения. Так как​ сортировка, фильтрация, условное​ размещаться отмеченные фрагменты:​ будут спрятаны. Но​.​ может повлечь сдвиг​и выполняем щелчок​ требуется убрать. Переходим​.​

• ​ ячейки из массива​, которая, в свою​ какими можно быстро​
• ​ которые в дальнейшем​ действия Rows().Delete​ ОК. В предварительно​ Excel. В категории​Вставка — Имя -​

​ нужно удалять повторяющиеся​ форматирование и т.п.​ сверху или снизу.​ их всегда можно​Все данные выбранной колонки​ элементов и нарушение​ по последнему номеру​ во вкладку​После этого выделяем первоначальный​ можно, применив сложную​

Способ 1: выделение групп ячеек

​ очередь, располагается в​ удалить пустые элементы.​ могут затруднить работу​В общем, ещё​

1. ​ выделенном столбце будут​Определенные пользователем (User Defined)​ Присвоить​ строки, то должны​Автор: Максим Тютюшев​ Впрочем, это не​ будет снова восстановить,​​ будут отсортированы по​​ структуры таблицы.​

   

2. ​ указанной области. Весь​«Главная»​​ массив данных. Щелкаем​​ формулу, состоящую из​ блоке инструментов​​Скачать последнюю версию​​ с таблицей.​

   

3. ​ раз большое спасибо​​ выделены все пустые​​выберите нашу функцию​(Insert — Name -​​ быть выделены все​​При импорте и копировании​ имеет принципиального значения.​​ сняв фильтрацию.​​ заданному критерию. Теперь​

   

4. ​Урок:​ диапазон строчек, лежащий​. Кликаем по пиктограмме​ правой кнопкой мыши.​ нескольких функций.​«Стили»​ Excel​Представим, что у нас​​ SergGhost и другим​​ ячейки. Остается кликнуть​

   
5. ​NoBlanks​ Define)​ столбцы.​ таблиц в Excel​ Стоит также отметить,​​Урок:​​ мы можем выделить​​Как удалить пустые строки​​ между этими номерами,​

​ в виде небольшого​ В открывшемся списке​Прежде всего, нам нужно​. Переходим в пункт​

Способ 2: условное форматирование и фильтрация

​Прежде всего, нужно разобраться,​ есть таблица с​ не безразличным участникам​ правой кнопкой мыши​.​Диапазону B3:B10 даем имя​После нажатия ОК Excel​ могут формироваться пустые​ что наименование​Применение фильтра в Excel​ рядом находящиеся элементы​ в Экселе​ будет выделен.​ треугольника, которая расположена​ в группе​ будет дать имя​

1. ​ открывшегося списка​ а действительно ли​ какими-то значениями, в​​ форума.​​ в любом месте​​В качестве аргумента функции​​ЕстьПустые​ формирует мини-отчет вида:​ строки и ячейки.​​«Порядок»​​Ещё более точно можно​ любым из тех​​Для того, чтобы убрать​​Если удаляемые строки разбросаны​ справа от значка​​«Параметры вставки»​​ диапазону, который подвергается​

   

2. ​«Правила выделения ячеек»​ можно в конкретном​ которой есть полностью​​Вероятно тему можно​​ выделенного поля и​ укажите исходный диапазон​, диапазону D3:D10 -​Проредить таблицу можно с​ Они мешают работе,​​может быть смещено​​ задать параметры выбора​

   

3. ​ вариантов, о которых​ строки по определенному​ по всему листу​«Удалить»​жмем на пиктограмму​ трансформации. Выделяем область,​. В появившемся списке​ массиве или таблице​ пустые строки.​​ считать закрытой.А можно​​ выбрать пункт «Удалить…»​​ с пустотами (B3:B10)​​НетПустых​​ помощью макроса. Например,​​ отвлекают.​ влево от самого​​ строк, если вместе​​ шла речь при​

   

4. ​ условию можно применять​ и не граничат​в блоке инструментов​«Значения​ делаем щелчок правой​ действий выбираем позицию​ удалять пустые ячейки?​​Приведем методы, которые используются​​ ли удалить «пустые»​​ в контекстном меню,​​ и нажмите​. Диапазоны должны быть​ такого:​Некоторые формулы могут работать​

   

   ​ поля. После того,​ с сортировкой или​ рассмотрении предыдущих способов,​ сортировку. Отсортировав элементы​ друг с другом,​​«Ячейки»​​».​ кнопкой мышки. В​​«Больше…»​​ Указанная процедура приводит​

   

5. ​ при удалении пустых​ строки, если в​ а в появившемся​Ctrl+Shift+Enter​ строго одного размера,​А можно ручками. Предлагаем​​ некорректно. Использовать ряд​​ как все вышеуказанные​​ фильтрацией использовать инструменты​​ и произвести их​ по установленному критерию,​​ то в таком​​. Выпадает список, в​

   
6. ​После этих действий данные​ активировавшемся меню выбираем​.​ к смещению данных,​ строк. Зачем нужно​ первой ячейке А​ диалоговом окне «Удаление​, чтобы ввести функцию​ а расположены могут​​ простенький способ, доступный​​ инструментов в отношении​

   

7. ​ настройки выполнены, жмем​ условного форматирования. Вариантов​ удаление.​ мы сможем собрать​ случае, нужно щелкнуть​ котором нужно выбрать​ будут вставлены в​ пункт​Открывается окошко условного форматирования.​ а это далеко​ удалять пустые строки​ проставлена только дата,​ ячеек» выбрать пункт​ как формулу массива.​ быть где угодно​

​ каждому пользователю.​​ не полностью заполненного​

​ на кнопку​​ ввода условий в​Кстати, этот же способ​

Способ 3: применение сложной формулы

​ все строчки, удовлетворяющие​ левой кнопкой мыши​ пункт​ изначальную область своего​«Присвоить имя…»​

1. ​ В левое поле​ не всегда является​ можно прочитать в​ остальные ячейки строки​ «Строка» и нажать​g_r_a_y​ относительно друг друга.​В конце таблицы делаем​​ диапазона невозможно. Научимся​​«OK»​

   

2. ​ этом случае очень​ можно использовать для​​ условию вместе, если​​ по всем номерам​«Удалить строки с листа»​ расположения цельным диапазоном​.​ вписываем цифру​ допустимым. По сути,​ статье Советы по​​ пустые? Спасибо.Полагаю, что​​ ОК. При этом,​: Преветствую Вас, гурЫ​Теперь выделим первую ячейку​ вспомогательный столбец. Заполняем​​ быстро удалять пустые​​.​

   

3. ​ много, поэтому мы​ группировки и массового​ они разбросаны по​ этих строчек на​.​ без пустых ячеек.​Открывается окно присвоения наименования.​«0»​ элементы можно удалять​​ построению таблиц.​​ да. Хотя сам​

   

4. ​ строго говоря, удаляются​ excel-я ))​ второго диапазона (D3)​ чередующимися данными. Например,​ ячейки в конце​Как видим, все строчки,​​ рассмотрим конкретный пример,​​ удаления пустых строчек.​

   

5. ​ всей таблице, и​ панели координат с​Строчка будет тут же​​ При желании массив,​​ В поле​. В правом поле​ только в двух​Самым простым способом удаления​ не проверял. С​

   ​ не пустые строки,​

   ​Постигла меня бЯда​ и введем в​ «о у о​ или середине таблицы.​ в которых имеются​​ чтобы вы поняли​​Внимание! Нужно учесть, что​ быстро убрать их.​​ зажатой клавишей​​ удалена.​

   

6. ​ который содержит формулу,​«Имя»​ выбираем любой цвет,​ случаях:​ пустых строк является​ этим есть сложности?Спасибо.​ а строки, содержащие​ лютая, подколодная и​ нее такую страшноватую​ у о у»​ Будем использовать простые​ выделенные по условию​ сам механизм использования​ при выполнении такого​Выделяем всю область таблицы,​Ctrl​Также можно выделить строку​ теперь можно удалить.​​даем любое удобное​​ но можно оставить​

   

7. ​Если строка (столбец) полностью​ сортировка таблицы: выделяем​ разобралась сама.​ пустые ячейки в​ закручинился добрый молодец​ формулу:​ и т.д. Вносим​ средства, доступные пользователю​ ячейки, сгруппированы вместе.​ этой возможности. Нам​ вида сортировки, после​​ в которой следует​​.​​ в целом, щелкнув​​Урок:​ название. Главное условие​​ настройки по умолчанию.​​ является пустой (в​​ диапазон, в котором​​Во многих случаях пустые​

   

8. ​ предварительно выделенном столбце.​ над думой тяжкою​=ЕСЛИ(СТРОКА()-СТРОКА(НетПустых)+1>ЧСТРОК(ЕстьПустые)-СЧИТАТЬПУСТОТЫ(ЕстьПустые);»»;ДВССЫЛ(АДРЕС(НАИМЕНЬШИЙ((ЕСЛИ(ЕстьПустые<>»»;СТРОКА(ЕстьПустые);СТРОКА()+ЧСТРОК(ЕстьПустые)));СТРОКА()-СТРОКА(НетПустых)+1);СТОЛБЕЦ(ЕстьПустые);4)))​ значения в первые​ любого уровня.​​ Они будут располагаться​​ нужно удалить строчки​​ удаления пустых ячеек​​ провести сортировку, или​

   

9. ​Для того, чтобы убрать​ левой кнопки мыши​Как присвоить имя ячейке​ – в нем​ Щелкаем по кнопке​ таблицах);​ содержится таблица (​ строки на листе​

​РоманИ​​ неподъёмною ))​В английской версии это​

​ четыре ячейки. Потом​Чтобы показать на примере,​ вверху или внизу​ в таблице, по​ положение строк будет​ одну из её​ выбранные строки, щелкаем​ по её номеру​ в Excel​ не должно быть​«OK»​Если ячейки в строке​

​А2:C17​

lumpics.ru

Удаление строки в Microsoft Excel

​ представляют собой проблему.​: У меня нет​В общем помогите​ будет:​ выделяем их. «Цепляем»​ как удалить лишние​ таблицы, в зависимости​ которым сумма выручки​ отличаться от первоначального.​ ячеек. Переходим во​ по любому выделению​ на вертикальной панели​Существует несколько способов удаления​ пробелов. Для примера​

​.​ и столбце логически​

Процесс удаления строк

​), затем вызываем команду​ Например, если ваша​ тех 76 строк​ с решением одной​=IF(ROW()-ROW(НетПустых)+1>ROWS(ЕстьПустые)-COUNTBLANK(ЕстьПустые),»»,INDIRECT(ADDRESS(SMALL((IF(ЕстьПустые<>»»,ROW(ЕстьПустые),ROW()+ROWS(ЕстьПустые))),ROW()-ROW(НетПустых)+1),COLUMN(ЕстьПустые),4)))​ за черный крестик​ строки, для демонстрации​ от того, какие​ менее 11000 рублей.​ В некоторых случаях​

Способ 1: одиночное удаление через контекстное меню

​ вкладку​ правой кнопкой мыши.​ координат. После этого,​ пустых элементов в​ мы присвоили диапазону​Как видим, все ячейки​

1. ​ не связаны друг​ меню Данные/ Сортировка​ таблица с данными​SergGhost​ проблемки, сам я​Причем ввести ее надо​​ в правом нижнем​​ порядка действий возьмем​

   

2. ​ параметры пользователь задал​Выделяем столбец​ это не важно.​«Главная»​ В контекстном меню​​ находясь во вкладке​​ Microsoft Excel. Вариант​

   ​ наименование​ указанного диапазона, в​

   ​ с другом (в​ и фильтр/ Сортировка​ содержит пустые строки,​: спасибо за совет​ уже почти отчаялся​ как формулу массива,​ углу и копируем​ таблицу с условными​ в окне сортировки.​​«Сумма выручки»​​ Но, если вам​

   

   ​и кликаем по​ останавливаемся на пункте​«Главная»​ с выделением групп​«С_пустыми»​ которых находятся значения,​

Способ 2: одиночное удаление с помощью инструментов на ленте

​ массивах).​ от минимального к​ то возникнут сложности​ по такому способу​ её решить да​​ т.е. после вставки​​ буквы до конца​

1. ​ данными:​ Теперь просто выделяем​, к которому хотим​ обязательно нужно вернуть​​ значку​​«Удалить»​, жмем на значок​ ячеек наиболее простой​. Больше никаких изменений​​ были выделены в​​Если пустых ячеек мало,​​ максимальному или просто​​ с фильтрацией, сортировкой,​ выборки, но это​ и в инете​​ нажать не​​ диапазона.​

   

2. ​Пример 1. Сортировка данных​ эти строчки тем​

​ применить условное форматирование.​ первоначальное расположение, то​«Сортировка и фильтр»​.​«Удалить»​ и быстрый. Но​ в том окне​​ выбранный цвет, а​​ то их вполне​​ /Сортировка.​​ построением сводных, т.к.​ не решило проблему..​​ мне ничего толкового​​Enter​

Способ 3: групповое удаление

​Устанавливаем «Фильтр». Отфильтровываем последний​ в таблице. Выделяем​ методом, который предпочитаем,​ Находясь во вкладке​

1. ​ тогда перед проведением​, которая расположена в​Операция удаления всех выбранных​, размещенный в блоке​ ситуации бывают разные.​ вносить не нужно.​ пустые остались белыми.​ можно удалить с​При сортировке таблиц с​ Microsoft Excel считает​

   

   ​если кто знаком​ не попалось.​(как обычно), а​ столбец по значению​ всю таблицу. Открываем​ и проводим их​​«Главная»​​ сортировки следует построить​ группе​ элементов будет произведена.​ инструментов​ Поэтому, как дополнительные​ Жмем на кнопку​

   

   ​ Опять выделяем наш​ помощью обычного ручного​ несколькими столбцами нужно​ пустую строку разрывом​ с oracle и​Суть такова, в​Ctrl+Shift+Enter​ «у».​ вкладку «Данные» -​ удаление с помощью​, производим щелчок по​​ дополнительный столбец и​​«Редактирование»​Урок:​

   
2. ​«Ячейки»​ способы, можно использовать​«OK»​ диапазон. В этой​ способа удаления. Но,​ быть осторожным, чтобы​ таблицы.​ структорой таблиц в​ прикреплённом файле xls,​. Теперь формулу можно​Выделяем все что осталось​

​ инструмент «Сортировка и​ контекстного меню или​ значку​ пронумеровать в нем​. В открывшемся списке​Как выполнить выделение в​.​

1. ​ варианты с фильтрованием​.​ же вкладке​ если таких незаполненных​ ячейки не перескочили​Обычно для удаления​ нём, там есть​ лист используется как​ скопировать вниз, используя​

   

   ​ после фильтрации и​ фильтр» — нажимаем​ кнопки на ленте.​​«Условное форматирование»​​ все строчки, начиная​ вариантов действий выбираем​ Excel​Для выполнения группового удаления​ и применением комплексной​​Выделяем в любом месте​​«Главная»​ элементов большое количество,​ из своих строк​ пустых строк включают​ у таблиц такой​ шаблон для загрузки​

   

   ​ автозаполнение (потянуть за​ удаляем.​ кнопку «Сортировка». Или​Затем можно отсортировать значения​, который расположен на​ с первой. После​ пункт​Иногда в таблице могут​ строчек, прежде всего,​ формулы.​ на листе точно​​щелкаем по кнопке​​ то в этом​

   

2. ​ в другие. Поэтому,​ фильтр, отбирают пустые​ параметр, так называемая​ данных, после n-ого​ черный крестик в​Убираем фильтр – останутся​​ щелкаем правой кнопкой​​ по столбцу с​

   

   ​ ленте в блоке​ того, как нежелательные​

​«Настраиваемая сортировка»​​ встречаться пустые строчки,​ нужно произвести выделение​

Способ 4: удаление пустых элементов

​Автор: Максим Тютюшев​ такой же по​«Сортировка и фильтр»​ случае, данную процедуру​ для сортировки нужно​ строки вручную и​ — верхняя отметка​ количества операций удаления​ правом нижнем углу​ только ячейки с​ мыши по выделенному​ нумерацией, чтобы наша​«Стили»​ элементы будут удалены,​.​ данные из которых​ необходимых элементов.​Во время работы с​ размерам диапазон пустых​, расположенной в группе​ нужно автоматизировать.​ выделять всю таблицу.​ затем их удаляют,​ (high — water​

1. ​ и вставки ползунок​​ ячейки) — и​​ «о».​ диапазону и делаем​​ таблица приняла прежний​​. После этого открывается​ можно провести повторную​​Можно также совершить альтернативные​​ были ранее удалены.​Для того, чтобы удалить​​ программой Excel часто​​ ячеек. Аналогично кликаем​

   

2. ​«Редактирование»​Наиболее простой способ удалить​ После сортировки по​ что хотя и​​ mark — высшая​​ горизонтальной прокрутки превращается​ мы получим исходный​​Вспомогательный столбец можно устранить​​ сортировку «от минимального​

   

3. ​ порядок. Ставший ненужным​ список действий. Выбираем​ сортировку по столбцу,​ действия, которые тоже​ Такие элементы лучше​ несколько рядом расположенных​ приходится прибегать к​ правой кнопкой мыши​. В открывшемся меню​ пустые элементы –​ возрастанию пустые строки​​ не сложно, но​​ точка) сегмента, так​ в «точку» ))​ диапазон, но без​​ и работать с​​ к максимальному».​ столбец с номерами​

   

   ​ там позицию​ где располагается эта​ приведут к открытию​

​ убрать с листа​ строчек, можно выделить​ процедуре удаления строк.​ и, вызвав контекстное​ жмем на кнопку​ это воспользоваться инструментом​ окажутся внизу таблицы.​ занимает некоторое время.​ вот мне кажется​ , что в​ пустых ячеек:​ «прореженной таблицей».​Пустые строки после сортировки​ можно убрать, выделив​

​«Правила выделения ячеек»​​ нумерация от меньшего​ окна настраиваемой сортировки.​

Способ 5: использование сортировки

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

1. ​Однажды пользователь скрыл некую​ по возрастанию оказываются​ его и нажав​. Далее запускается ещё​ к большему. В​ После выделения любого​​ расположены рядом друг​​ строк, находящиеся в​ быть, как единичным,​​ пункту​​.​Выделяем диапазон на листе,​​ до сортировки, то​​ проще всего использовать​ точки зрения), что​ скроллинг для конечного​​ вам часто придется​​ информацию в строках,​

   

   ​ внизу диапазона.​ знакомую нам кнопку​ одно меню. В​ таком случае таблица​ элемента таблицы переходим​ с другом, то​ одном столбце. Для​​ так и групповым,​​«Присвоить имя…»​После этих действий, как​​ над которым будем​​ перед сортировкой нужно​​ простой макрос. Нажмите​​ тут что-то подобное​

   

2. ​ пользователя. Удалить лишние​ повторять процедуру удаления​ чтобы она не​Если порядок значений важен,​​«Удалить»​​ нем нужно конкретнее​ приобретет изначальный порядок,​ во вкладку​​ вполне можно воспользоваться​​ этого зажимаем левую​ в зависимости от​.​ видим, в верхнем​ проводить операцию поиска​​ создать столбец с​​ Alt+F11 или выберите​ и как с​ «пустые» строки, а​
   • ​ пустых ячеек из​
   • ​ отвлекала от работы.​
   • ​ то до сортировки​
   • ​на ленте.​

   ​ выбрать суть правила.​ естественно за вычетом​«Данные»​ одним из способов,​​ кнопку мыши и​​ поставленных задач. Особый​В открывшемся окне, как​ элементе столбца появилась​ и удаления пустых​

   ​ порядковой нумерацией строк,​​ на вкладке​​ этим бороться я​ также отобрать фильтром​ диапазонов, то лучше​ Думал, что впоследствии​ необходимо вставить пустой​Поставленная задача по заданному​ Тут уже следует​ удаленных элементов.​. Там в группе​​ который был описан​​ курсором проводим по​​ интерес в этом​​ и в предыдущий​​ пиктограмма символизирующая фильтр.​​ элементов. Жмем на​​ а после удаления​​Разработчик​ не знаю..​ не получается.​ один раз добавить​ данные еще понадобятся.​ столбец, сделать сквозную​
   ​ условию решена.​ производить выбор, основываясь​Урок:​ настроек​​ выше. Но что​​ этим элементам.​

   

3. ​ плане представляет удаление​ раз, присваиваем любое​ Жмем на неё.​ функциональную клавишу на​ пустых строк, заново​- Visual Basic​да точно, видимо​Поможите люди добрые​ в стандартный набор​ Не понадобились –​ нумерацию. После сортировки​

​Кроме того, можно произвести​ на фактической задаче.​Сортировка данных в Экселе​«Сортировка и фильтр»​

​ делать, если пустых​Если диапазон большой, то​ по условию. Давайте​ наименование данной области.​ В открывшемся списке​ клавиатуре​ отсортировать таблицу уже​(Developer — Visual Basic​ при подготовке примера​ побороть эту вражину​ свою функцию для​ скрытые строки можно​ и удаления пустых​ аналогичную операцию с​ В нашем отдельном​Для удаления строк, которые​жмем на кнопку​ строк много и​ можно выделить самую​ рассмотрим различные варианты​ Мы решили дать​ переходим в пункт​F5​ по этому столбцу.​ Editor)​ исчезли) теперь их​ акаянную ))​ удаления пустых ячеек,​

​ удалить: они влияют​​ строк вновь отсортировать​

Способ 6: использование фильтрации

​ условным форматированием, но​ случае нужно выбрать​ содержат определенные значения,​«Сортировка»​ они разбросаны по​ верхнюю ячейку, щелкнув​ данной процедуры.​ ей название​«Сортировка по цвету»​.​Для нахождения пустых ячеек​. Если вкладки Разработчик​

1. ​ 8​g_r_a_y​ и пользоваться ей​ на формулы, мешают.​ данные по вставленному​ только после этого​​ позицию​​ можно также использовать​.​​ всему пространству большой​​ по ней левой​Скачать последнюю версию​«Без_пустых»​​. Далее в группе​​Запускается небольшое окошко, которое​

   

   ​ можно также воспользоваться​ не видно, то​если у вас​: А можно поподробнее.​​ во всех последующих​​В тренировочной таблице скрыты​ столбцу с нумерацией.​ проведя фильтрацию данных.​​«Меньше…»​​ такой инструмент, как​Запускается окно настраиваемой сортировки.​​ таблицы? Ведь процедура​​ кнопкой мыши. Затем​

   

2. ​ Excel​.​«Сортировка по цвету ячейки»​ называется​ Фильтром (Главная/ Редактирование/​ можно включить ее​ стоит отбор по​ Пустые строки у​ случаях.​ ряды 5, 6,​Пример 2. Фильтр. Диапазон​Итак, применяем условное форматирование​

   

3. ​.​ фильтрация. Преимущество данного​ Обязательно установите галочку,​ их поиска и​ зажать клавишу​Удаление строчек можно произвести​​Выделяем двойным щелчком левой​​выбираем тот цвет,​

​«Переход»​ Сортировка и фильтр/​ через​ пустым строкам то​ Вас образовались из-за​Для этого откройте редактор​ 7:​

​ должен быть отформатирован​​ к столбцу​

Способ 7: условное форматирование

​Запускается окно условного форматирования.​ способа состоит в​ в случае её​ удаления может занять​Shift​ совершенно разными способами.​ кнопки мышки первую​ которым произошло выделение​. Жмем в нем​ Фильтр). Выбираем подходящий​Файл — Параметры -​ отобранные строки подсвечены​ того, что шапка​ Visual Basic (​Будем их удалять.​ как таблица с​«Сумма выручки»​

1. ​ В левом поле​​ том, что, если​​ отсутствия, около пункта​ значительное время. Для​и кликнуть по​​ Выбор конкретного решения​​ ячейку условного диапазона​ в результате условного​​ кнопку​​ столбец, отображаем только​ Настройка ленты (File​​ синим цветом, остальные​​ состоит из 2​ALT+F11​Переходим на «Файл»-«Сведения»-«Поиск проблем»​​ заголовками. Выделяем «шапку».​​по полностью аналогичному​ устанавливаем значение​ вам вдруг эти​«Мои данные содержат заголовки»​ ускорения решения данной​ самой нижней ячейке​ зависит от того,​«Без_пустых»​ форматирования.​«Выделить…»​​ пустые ячейки, выделяем​​ — Options -​

   

2. ​ можно увидеть по​ строк, притом заполнена​), вставьте новый пустой​​ — инструмент «Инспектор​​ На вкладке «Данные»​ сценарию. Включаем фильтрацию​11000​ строчки когда-нибудь понадобится​, если у вашей​ задачи можно применить​ того диапазона, который​ какие задачи ставит​(у вас он​Можно также сделать немного​.​​ строки не содержащие​​ Customize Ribbon)​

   

3. ​ ctrl + end​ только первая.​ модуль (меню​ документов».​ нажимаем кнопку «Фильтр»​ в таблице одним​. Все значения, которые​ снова, то вы​ таблицы имеется шапка.​ нижеописанный алгоритм.​ нужно удалить. Выделены​ перед собой пользователь.​ может назваться и​ по-другому. Кликаем по​​Открывается следующее окно –​​ данных и удаляем​.​ или «Найти и​

   

4. ​g_r_a_y​Insert — Module​В отрывшемся окне ставим​​ («Сортировка и фильтр»).​​ из тех способов,​ меньше него, будут​​ их сможете всегда​​ В поле​​Переходим во вкладку​​ будут все элементы,​​ Рассмотрим различные варианты,​​ по-другому). Вставляем в​​ значку фильтрации. В​​«Выделение групп ячеек»​ их.​В открывшемся окне редактора​ выделить» => «Выделение​: ошибочка небольшая не​) и скопируйте туда​ галочку напротив «Скрытые​ Справа от названия​​ которые были уже​​ отформатированы. В правом​ вернуть.​«Сортировать по»​«Главная»​ находящиеся между ними.​ начиная от простейших​ неё формулу следующего​​ появившемся меню снимаем​​. Устанавливаем в нем​Другим способом выделения пустых​ Visual Basic выберите​ группы ячеек» =>​ горизонтальный, а вертикальный​ текст этой функции:​​ строки и столбцы».​​ каждого столбца появится​

   

5. ​ озвучены выше.​ поле есть возможность​Выделяем всю таблицу или​нужно выбрать наименование​. На ленте инструментов​В случае, если нужно​ и заканчивая относительно​ типа:​ галочку с позиции​ переключатель в позицию​ ячеек является использование​ в меню​ «Последнюю ячейку»​ ползунок )​Function NoBlanks(DataRange As​ Нажимаем «Проверить».​ стрелочка вниз. Нажимаем​

   

6. ​После того, как в​ выбрать любой цвет​ шапку курсором с​ столбца, по которому​ жмем на значок​ удалить строчные диапазоны,​ сложными методами.​=ЕСЛИ(СТРОКА()-СТРОКА(Без_пустых)+1>ЧСТРОК(С_пустыми)-СЧИТАТЬПУСТОТЫ(С_пустыми);»»;ДВССЫЛ(АДРЕС(НАИМЕНЬШИЙ((ЕСЛИ(С_пустыми «»;СТРОКА(С_пустыми);СТРОКА()+ЧСТРОК(С_пустыми)));СТРОКА()-СТРОКА(Без_пустых)+1);СТОЛБЕЦ(С_пустыми);4)))​«Пустые»​​«Пустые ячейки»​​ инструмента Выделение группы​

​Insert — Module​g_r_a_y​

​отбор стоит по​ Range) As Variant()​Через несколько секунд программа​ – открывается окно​ шапке появились значки,​

1. ​ форматирования, хотя можно​ зажатой левой кнопкой​​ будет происходить отбор​​«Найти и выделить»​ которые расположены в​Наиболее простой способ удаления​Так как это формула​. После этого щелкаем​. Выполняем щелчок по​

   

2. ​ ячеек.​и в появившийся​: ну да, 8​ пустым строкам, но​ Dim N As​ отображает результат проверки.​​ фильтрации. Снимаем выделение​​ символизирующие фильтр, кликаем​ также оставить там​​ мыши. Кликаем по​​ значений для удаления.​​. Он расположен в​​ отдалении друг от​​ строчек – это​​ массива, то для​

   

3. ​ по кнопке​ кнопке​выделяем диапазон​ пустой модуль скопируйте​ внизу отбора есть.​ если по комбинации​ Long Dim N2​Нажимаем «Удалить все». На​ напротив имени «Пустые».​ по тому из​ значение по умолчанию.​

​ уже знакомой нам​​ В поле​

​ группе​ друга, то для​ одиночный вариант данной​ выведения расчета на​«OK»​«OK»​А2:C17​ и вставьте следующие​ Но они как-раз​ ctrl + end​ As Long Dim​ экране появится соответствующее​Таким же способом можно​ них, который расположен​ После того, как​ кнопке​«Сортировка»​«Редактирование»​ их выделения следует​ процедуры. Выполнить его​ экран нужно нажать​.​.​;​

​ строки:​

lumpics.ru

Как удалить пустые строки в Excel быстрыми способами

​ до того места,​ перейти к последней​ Rng As Range​ уведомление.​ удалить пустые ячейки​ в столбце​

​ настройки выполнены, щелкаем​«Сортировка и фильтр»​нужно указать, по​. В открывшемся списке​ кликнуть по одной​ можно, воспользовавшись контекстным​ комбинацию клавиш​В любом из указанных​Как видим, все пустые​выбираем пункт меню Главная/​Sub DeleteEmptyRows() LastRow​

Как в таблице Excel удалить пустые строки?

​ где Вы записали​ записи листа, как​ Dim MaxCells As​В результате проделанной работы​ в строке Excel.​«Сумма выручки»​

​ по кнопке​, которая расположена во​ какому именно параметру​ жмем на пункт​ из ячеек, находящихся​ меню.​Ctrl+Shift+Enter​ в предыдущем пункте​ элементы указанного диапазона​ Редактирование/ Найти и​ = ActiveSheet.UsedRange.Row -​ свой текст)))))​

​ я это понимаю​ Long Dim Result()​ скрытые ячейки удалены,​

​ Выбираем нужный столбец​. В открывшемся меню​«OK»​ вкладке​ будет происходить отбор:​«Выделение группы ячеек»​ в них, левой​Кликаем правой кнопкой мыши​, вместо обычного нажатия​

​ вариантов пустые элементы​ были выделены. Кликаем​ выделить/ Выделение группы​ 1 + ActiveSheet.UsedRange.Rows.Count​NTalisman​ )), то показывает​ As Variant Dim​ нумерация восстановлена.​ и фильтруем его​ выбираем пункт​.​«Главная»​Значения;​

​.​ кнопкой мыши с​ по любой из​ кнопки​ будут скрыты. Выделяем​ по любому из​

​ ячеек…,​ ‘определяем размеры таблицы​: … сотрите текст,​ лишние 76 строк​ R As Long​Таким образом, убрать пустые,​ данные.​«Фильтр по цвету»​

​Как видим, все ячейки,​. Но на этот​

​Цвет ячейки;​Запускается небольшое окошко выделения​ одновременно зажатой клавишей​ ячеек той строки,​

​Enter​ диапазон оставшихся ячеек.​

​ них правой кнопкой​выберите пункт пустые ячейки​ Application.ScreenUpdating = False​ удалите строки и​ на которые не​ Dim C As​

​ повторяющиеся или скрытые​Пример 3. Выделение группы​. В блоке параметров​ в которых имеются​ раз из открывшегося​Цвет шрифта;​ группы ячеек. Ставим​

​Ctrl​

Как удалить повторяющиеся строки в Excel?

​ которую нужно удалить.​.​ На вкладке​ мыши. В запустившемся​ в разделе Выделить;​ For r =​ попробуйте снова​

​ влияют отборы, но​ Long MaxCells =​ ячейки таблицы можно​ ячеек. Выделяем всю​«Фильтр по цвету ячейки»​ значения выручки менее​ списка выбираем позицию​Значок ячейки.​

​ в нем переключатель​. Все выбранные элементы​

Как удалить каждую вторую строку в Excel?

​ В появившемся контекстном​Но, как видим, заполнилась​«Главная»​

​ контекстном меню щелкаем​далее нажимаем маленькую стрелочку​ LastRow To 1​

1. ​SergGhost​ после большого количества​ Application.WorksheetFunction.Max( _ Application.Caller.Cells.Count,​ с помощью встроенного​ таблицу. В главном​выбираем значение​ 11000 рублей, были​«Фильтр»​Тут уже все зависит​ в позицию​ будут отмечены.​ меню выбираем пункт​ только одна ячейка.​в блоке настроек​
2. ​ по пункту​ в меню Главная/​ Step -1 ‘проходим​
3. ​: При выгрузке, вероятно,​ удаления/вставки подобных строк​ DataRange.Cells.Count) ReDim Result(1​
4. ​ функционала программы Excel.​ меню на вкладке​«Нет заливки»​

​ окрашены в выбранный​.​ от конкретных обстоятельств,​

Как удалить скрытые строки в Excel?

​«Пустые ячейки»​Чтобы провести непосредственную процедуру​«Удалить…»​ Для того, чтобы​«Буфер обмена»​«Удалить…»​ Ячейки/ Удалить;​ от последней строки​ — выбрать максимальное​ становится куча и​

​ To MaxCells, 1​Имеем диапазон ячеек с​ «Редактирование» нажимаем кнопку​

​.​

1. ​ цвет. Если нам​Как и в предыдущем​ но в большинстве​
2. ​. После этого жмем​ удаления строчек вызываем​.​ заполнились и остальные,​
3. ​выполняем щелчок по​.​
4. ​выберем Удалить ячейки (удалить​ до первой If​ возможное количество заполненных​

​ извести их у​ To 1) For​ данными, в котором​

​ «Найти и выделить».​Как видим, после этого​ нужно сохранить изначальный​ способе, задачу можно​ случаев подходит критерий​

exceltable.com

Удаление пустых ячеек из диапазона

Постановка задачи

​ на кнопку​ контекстное меню или​Открывается небольшое окошко, в​

​ нужно скопировать формулу​ кнопке​Открывается маленькое окошко, в​

Способ 1. Грубо и быстро

1. ​ ячейки, со сдвигом​
2. ​ Application.CountA(Rows(r)) = 0​​ строк, например 100,​​ меня не получается​​ Each Rng In​ ​ есть пустые ячейки:​​ Выбираем инструмент «Выделение​ действия все строчки,​​ порядок, после удаления​ ​ также решить через​​«Значения»​​«OK»​​ же переходим к​
   
   ​ котором нужно указать,​ на оставшуюся часть​
3. ​«Копировать»​ котором нужно выбрать,​ вверх).​ Then Rows(r).Delete ‘если​​ а могут быть​ ​ ((​​ DataRange.Cells If Rng.Value​

Способ 2. Формула массива

​Задача — удалить пустые​ группы ячеек».​ которые были залиты​​ строк делаем дополнительную​​ вкладку​​. Хотя в дальнейшем​​.​ инструментам на ленте,​ что именно нужно​​ диапазона. Это можно​.​ ​ что именно следует​Здесь нужно быть аккуратным:​

​ в строке пусто​​ заполнены всего 20,​​SergGhost​​ <> vbNullString Then​​ ячейки, оставив только​В открывшемся окне выбираем​ цветом с помощью​ нумерацию в соседнем​«Данные»​

​ мы поговорим и​Как видим, после того,​ а далее следуем​ удалить. Переставляем переключатель​ сделать с помощью​

​Затем выделяем любую пустую​

​ удалить. Оставляем настройки​ если таблица сдержит​
​ — удаляем ее​

​ выгрузит 20 заполненных​: …..​ N = N​ ячейки с информацией.​​ пункт «Пустые ячейки».​​ условного форматирования, исчезли.​​ с таблицей столбце.​​. Для этого, находясь​ об использовании другой​ как мы применили​ тем рекомендациям, которые​ в позицию​ маркера заполнения. Устанавливаем​ область на том​ по умолчанию –​ помимо пустых строк,​

Способ 3. Пользовательская функция на VBA

​ Next r End​ и 80 пустых​Сожалею, воспроизвести не​ + 1 Result(N,​Выделяем исходный диапазон​Программа отмечает пустые ячейки.​ Они спрятаны фильтром,​ Запускаем уже знакомое​ в ней, нужно​ позиции.​ данное действие, все​ были даны во​

​«Строку»​ курсор в нижний​​ же или на​​«Ячейки, со сдвигом вверх»​ строки с заполненными​​ Sub​​NTalisman​ получается.​

​ 1) = Rng.Value​Жмем клавишу​ На главной странице​ но если удалить​ нам окно сортировки​ щелкнуть по кнопке​В поле​ пустые элементы выделены.​ время описания первого​.​ правый угол ячейки,​ другом листе. Выполняем​. Жмем на кнопку​ и пустыми ячейками,​Закройте редактор и вернитесь​:​g_r_a_y​ End If Next​F5​ находим вкладку «Ячейки»,​ фильтрацию, то в​ по столбцу​«Фильтр»​«Порядок»​ Теперь можно использовать​ и второго способа​После этого указанный элемент​ содержащей комплексную функцию.​ щелчок правой кнопкой​«OK»​ то часть ячеек​ в Excel.​У меня я​: не совсем понял,​

​ Rng For N2​, далее кнопка​ нажимаем «Удалить».​ таком случае, указанные​«Сумма выручки»​, которая расположена в​

1. ​нужно указать, в​ для их удаления​
2. ​ данного руководства.​​ будет удален.​ Курсор должен преобразоваться​​ мыши. В появившемся​​.​ ​ перескочит со своих​​Теперь нажмите сочетание Alt+F8​​ так понимаю их​​ а что именно​ = N +​​Выделить​​Результат – заполненный диапазон​​ элементы снова отобразятся​​любым из способов,​
3. ​ блоке инструментов​ каком порядке будут​ любой из способов,​Выделить нужные элементы можно​​Также можно кликнуть левой​​ в крестик. Зажимаем​ контекстном списке действий​

planetaexcel.ru

Удаление «пустых» строк в EXCEL

​После этих манипуляций все​​ строк на другие,​ или кнопку​
​ 5))) И ты​ не получается?​ 1 To MaxCells​(Special)​ «без пустот».​
​ в документе.​ о которых шла​«Сортировка и фильтр»​ сортироваться данные. Выбор​ о которых шла​ также через вертикальную​ кнопкой мыши по​ левую кнопку мыши​
​ в параметрах вставки​ пустые элементы внутри​ что испортит таблицу.​Макросы​ хочешь чтобы они​g_r_a_y​ Result(N2, 1) =​. В открывшмся окне​Внимание! После удаления часть​Урок:​ речь выше.​.​ критериев в этом​ речь выше. Например,​ панель координат. В​ номеру строчки на​
​ и тянем его​ выбираем пункт​ указанного диапазона будут​

​ Если таблица в​​на вкладке​ не отображались при​: вот так не​ vbNullString Next N2​ выбираем​ ячеек перескакивает вверх​Условное форматирование в Экселе​

​Открывается окно сортировки. Как​​После выполнения любого из​ поле зависит от​ можно нажать на​
​ этом случае будут​ вертикальной панели координат.​ вниз до самого​«Значения»​ удалены.​ формате EXCEL 2007,​Разработчик​ фильтре «пустые»?​ получается?​ If Application.Caller.Rows.Count =​Пустые ячейки​ – данные могут​Как видим, существует очень​ всегда, обращаем внимание,​ вышеуказанных действий около​ формата данных выделенного​ кнопку​

​ выделяться не отдельные​​ Далее следует щелкнуть​
​ конца диапазона​.​

​Удалить пустые ячейки можно​​ то EXCEL не​.​Помогает макрос:​

​Удаление при помощи​​ 1 Then NoBlanks​(Blanks)​
​ перепутаться. Поэтому для​ большое количество способов​
​ чтобы около пункта​ правой границы каждой​ столбца. Например, для​«Удалить»​ ячейки, а строчки​ по выделению правой​«Без_пустых»​Как видим, произошла вставка​ также путем применения​ даст испортить таким​В открывшемся окне​PureBasic Sub DeleteEmptyRows()​ выделения группы ячеек​ = Application.Transpose(Result) Else​и жмем​ перекрывающихся диапазонов инструмент​ удалить ненужные строки.​«Мои данные содержат заголовки»​ ячейки шапки появится​ текстовых данных порядок​, которая расположена на​ полностью.​ кнопкой мышки. В​.​ данных без сохранения​ условного форматирования и​ образом таблицу: появится​ будут перечислены все​ LastRow = ActiveSheet.UsedRange.Row​Для того чтобы​ NoBlanks = Result​ОК​ не подходит.​ Каким именно вариантом​стояла галочка. В​ символ фильтрации в​ будет​ ленте в той​Для того, чтобы выделить​

​ активировавшемся меню требуется​​Как видим, после этого​ форматирования. Теперь можно​

​ последующей фильтрации данных.​​ сообщение «Данная команда​ доступные вам в​ — 1 +​ удалить пустые строки​
​ End If End​.​Полезный совет! Сочетание клавиш​ воспользоваться зависит от​ поле​ виде треугольника, направленного​«От А до Я»​ же вкладке​ смежную группу строк,​ выбрать пункт​ действия мы имеем​ удалить первичный диапазон,​ Этот метод сложнее​ неприменима для перекрывающихся​ данный момент для​ ActiveSheet.UsedRange.Rows.Count Application.ScreenUpdating =​ в Excel 2007​
​ Function​Выделяются все пустые​ для удаления выделенной​ поставленной задачи и​
​«Сортировать по»​ углом вниз. Жмем​или​«Главная»​ зажимаем левую кнопку​«Удалить»​ диапазон, в котором​ а на его​ предыдущего, но, тем​ диапазонов».​ запуска макросы, в​

​ False For r​​ и 2010 можно​Не забудьте сохранить файл​ ячейки в диапазоне.​ строки в Excel​ от количества удаляемых​выбираем столбец​

​ по этому символу​​«От Я до А»​, где мы сейчас​ мыши и проводим​

​.​​ подряд расположены заполненные​ место вставить тот,​ не менее, некоторые​СОВЕТ:​ том числе только​ = LastRow To​ использовать возможностью выделения​ и вернитесь из​

​Даем в меню команду​​ CTRL+«-». А для​
​ элементов. Например, чтобы​«Сумма выручки»​ в том столбце,​, а для даты​ работаем.​ курсором по вертикальной​

​В этом случае процедура​
​ ячейки. Но выполнять​ который мы получили​ пользователи предпочитают именно​Стоит помнить, что​ что созданный макрос​ 1 Step -1​ группы ячеек. Для​ редактора Visual Basic​ на удаление выделенных​ ее выделения можно​ удалить одну-две строчки​. В поле​ где находится значение,​«От старых к новым»​
​Как видим, все незаполненные​ панели координат от​ удаления проходит сразу​ различные действия с​ в ходе вышеописанной​
​ его. Кроме того,​ ячейки, содержащие формулы​DeleteEmptyRows​ If Application.CountA(Rows(r)) =​
​ этого выделяем столбец,​ в Excel. Чтобы​ ячеек: правой кнопкой​ нажать комбинацию горячих​ вполне можно обойтись​
​«Сортировка»​ по которому мы​или​ элементы таблицы были​ верхнего строчного элемента,​ и не нужно​ этими данными мы​ процедуры, а можно​ нужно сразу оговориться,​ (даже если это​. Выберите его и​ 0 Then Rows(r).Delete​

CyberForum.ru

Удаление всех пустых строк на листе

​ содержащий пустые ячейки,​ использовать эту функцию​ мыши​ клавиш SHIFT+ПРОБЕЛ.​ стандартными инструментами одиночного​устанавливаем значение​ будем убирать строки.​«От новых к старым»​ удалены.​ который нужно удалить,​ производить дополнительные действия​ не сможем, так​

​ продолжать работу с​ что этот способ​ ссылки на пустые​ нажмите кнопку​ Next r End​ после чего находим​ в нашем примере:​-​

​​ удаления. Но чтобы​«Цвет ячейки»​Открывается меню фильтрования. Снимаем​. Собственно сам порядок​​Обратите внимание! При использовании​ ​ к нижнему.​ ​ в окне выбора​ как они связаны​​ данными на новом​ подходит только в​ ячейки), не считаются​Выполнить (Run)​​ SubПасибиЩЩЩе волшебник SergGhost​ на ленте Excel​Выделите достаточный диапазон пустых​Удалить ячейки (Delete Cells)​​Чтобы удалить одинаковые строки​

​ выделить много строк,​. В следующем поле​ галочки с тех​​ большого значения не​​ данного метода строчка​Можно также воспользоваться и​ объекта обработки.​ формулой массива. Выделяем​

​ месте. Тут все​ том случае, если​ пустыми по определению.​- все пустые​ )) 2-ой пост​ вкладку «Главная», в​ ячеек, например F3:F10.​со сдвигом вверх.​ в Excel, выделяем​ пустые ячейки или​ выбираем тот цвет,​ значений в строчках,​ имеет, так как​ должна быть абсолютно​ вариантом с использованием​Кроме того, эту процедуру​

​ весь диапазон​ уже зависит от​

​ значения находятся в​При выполнении задач в​​ строки на листе​​ и в точку)​​ группе «Редактирование» выбираем​​Идем в меню​​Для упрощения дадим нашим​ всю таблицу. Переходим​ элементы по заданному​ строчки с которым​ которые хотим убрать.​ в любом случае​ пустая. Если в​​ клавиши​​ можно выполнить с​«Без_пустых»​​ конкретных задач и​​ одном столбце и​ приложении Excel может​ будут удалены.​

planetaexcel.ru

​ то, что надо!​

Хитрости »

28 Май 2011              644957 просмотров

Как удалить строки по условию?

Предположу, что почти каждый сталкивался с ситуацией, когда необходимо удалить только определенные строки: имеется большая таблица и необходимо удалить из неё только те строки, которые содержат какое-то слово (цифру, фразу). Для выполнения подобной задачи можно воспользоваться несколькими способами.

Способ первый:
Использовать встроенное средство Excel — фильтр. Сначала его необходимо «установить» на листе:

• Выделяем таблицу с данными, включая заголовки. Если их нет — то выделяем с самой первой строки таблицы, в которой необходимо удалить данные
• устанавливаем фильтр:
  • для Excel 2003: Данные—Фильтр—Автофильтр
  • для Excel 2007-2010: вкладка Данные(Data) —Фильтр(Filter)(или вкладка Главная(Home) —Сортировка и фильтр(Sort&Filter) —Фильтр(Filter))

Теперь выбираем условие для фильтра:

• в Excel 2003 надо выбрать Условие и в появившейся форме выбрать непосредственно условие(«равно», «содержит», «начинается с» и т.д.), а напротив значение в соответствии с условием.
• Для 2007-2010 Excel нужно выбрать Текстовые фильтры(Text Filters) и либо сразу выбрать одно из предлагаемых условий, либо нажать Настраиваемый фильтр(Custom Filter) и ввести значения для отбора в форме

После этого удалить отфильтрованные строки. В 2007 Excel могут возникнуть проблемы с удалением отфильтрованных строк, поэтому рекомендую сначала так же прочитать статью: Excel удаляет вместо отфильтрованных строк — все?! Как избежать.

 
Способ второй:

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

Sub Del_SubStr()
    Dim sSubStr As String 'искомое слово или фраза(может быть указанием на ячейку)
    Dim lCol As Long      'номер столбца с просматриваемыми значениями
    Dim lLastRow As Long, li As Long
    Dim lMet As Long
    Dim arr
 
    sSubStr = InputBox("Укажите значение, которое необходимо найти в строке", "www.excel-vba.ru", "")
    If sSubStr = "" Then lMet = 0 Else lMet = 1
    lCol = Val(InputBox("Укажите номер столбца, в котором искать указанное значение", "www.excel-vba.ru", 1))
    If lCol = 0 Then Exit Sub
 
    lLastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
    arr = Cells(1, lCol).Resize(lLastRow).Value
    Application.ScreenUpdating = 0
    Dim rr As Range
    For li = 1 To lLastRow 'цикл с первой строки до конца
        If -(InStr(arr(li, 1), sSubStr) > 0) = lMet Then
            If rr Is Nothing Then
                Set rr = Cells(li, 1)
            Else
                Set rr = Union(rr, Cells(li, 1))
            End If
        End If
    Next li
    If Not rr Is Nothing Then rr.EntireRow.Delete
    Application.ScreenUpdating = 1
End Sub

Если значение sSubStr не будет указано, то будут удалены строки, ячейки указанного столбца которых, пустые.
Данный код необходимо поместить в стандартный модуль. Вызвать с листа его можно нажатием клавиш Alt+F8, после чего выбрать Del_SubStr и нажать Выполнить. Если в данном коде в строке
If -(InStr(Cells(li, 1), sSubStr) > 0) = lMet Then
вместо = lMet указать <> lMet, то удаляться будут строки, не содержащие указанное для поиска значение. Иногда тоже удобно.
Но. Данный код просматривает строки на предмет частичного совпадения указанного значения. Например, если Вы укажете текст для поиска «отчет», то будут удалены все строки, в которых встречается это слово(«квартальный отчет», «отчет за месяц» и т.д.). Это не всегда нужно. Поэтому ниже приведен код, который будет удалять только строки, указанные ячейки которых равны конкретно указанному значению:

Sub Del_SubStr()
    Dim sSubStr As String 'искомое слово или фраза(может быть указанием на ячейку)
    Dim lCol As Long 'номер столбца с просматриваемыми значениями
    Dim lLastRow As Long, li As Long
    Dim arr
 
    sSubStr = InputBox("Укажите значение, которое необходимо найти в строке", "www.excel-vba.ru", "")
    lCol = Val(InputBox("Укажите номер столбца, в котором искать указанное значение", "www.excel-vba.ru", 1))
    If lCol = 0 Then Exit Sub
 
    lLastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
    arr = Cells(1, lCol).Resize(lLastRow).Value
 
    Application.ScreenUpdating = 0
    Dim rr As Range
    For li = 1 To lLastRow 'цикл с первой строки до конца
        If CStr(arr(li, 1)) = sSubStr Then
            If rr Is Nothing Then
                Set rr = Cells(li, 1)
            Else
                Set rr = Union(rr, Cells(li, 1))
            End If
        End If
    Next li
    If Not rr Is Nothing Then rr.EntireRow.Delete
    Application.ScreenUpdating = 1
End Sub

Здесь так же, как и в случае с предыдущим кодом можно заменить оператор сравнения(Cells(li, lCol) = sSubStr) с равно на неравенство(Cells(li, lCol) <> sSubStr) и тогда удаляться будут строки, значения ячеек которых не равно указанному.

УДАЛЕНИЕ СТРОК НА ОСНОВАНИИ СПИСКА ЗНАЧЕНИЙ(МНОЖЕСТВЕННЫЕ КРИТЕРИИ)
Иногда бывают ситуации, когда необходимо удалить строки не по одному значению, а по нескольким. Например, если строка содержит или Итог или Отчет. Ниже приведен код, при помощи которого можно удалить строки, указав в качестве критерия диапазон значений.
Значения, которые необходимо найти и удалить перечисляются на листе с именем «Лист2». Т.е. указав на «Лист2» в столбце А(начиная с первой строки) несколько значений — они все будут удалены. Если лист называется иначе(скажем «Соответствия») в коде необходимо будет «Лист2» заменить на «Соответствия». Удаление строк происходит на активном в момент запуска кода листе. Это значит, что перед запуском кода надо перейти на тот лист, строки в котором необходимо удалить.

Sub Del_Array_SubStr()
    Dim sSubStr As String    'искомое слово или фраза
    Dim lCol As Long    'номер столбца с просматриваемыми значениями
    Dim lLastRow As Long, li As Long
    Dim avArr, lr As Long
    Dim arr
 
    lCol = Val(InputBox("Укажите номер столбца, в котором искать указанное значение", "www.excel-vba.ru", 1))
    If lCol = 0 Then Exit Sub
    Application.ScreenUpdating = 0
    lLastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
    'заносим в массив значения листа, в котором необходимо удалить строки
    arr = Cells(1, lCol).Resize(lLastRow).Value
    'Получаем с Лист2 значения, которые надо удалить в активном листе
    With Sheets("Лист2") 'Имя листа с диапазоном значений на удаление
        avArr = .Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp))
    End With
    'удаляем
    Dim rr As Range
    For lr = 1 To UBound(avArr, 1)
        sSubStr = avArr(lr, 1)
        For li = 1 To lLastRow 'цикл с первой строки до конца
            If CStr(arr(li, 1)) = sSubStr Then
                If rr Is Nothing Then
                    Set rr = Cells(li, 1)
                Else
                    Set rr = Union(rr, Cells(li, 1))
                End If
            End If
            DoEvents
        Next li
        DoEvents
    Next lr
    If Not rr Is Nothing Then rr.EntireRow.Delete
    Application.ScreenUpdating = 1
End Sub

Чтобы код выше удалял строки не по точному совпадению слов, а по частичному(например, в ячейке записано «Привет, как дела?», а в списке есть слово «привет» — надо удалить, т.к. есть слово «привет»), то надо строку:

If CStr(arr(li, 1)) = sSubStr Then

заменить на такую:

If InStr(1, arr(li, 1), sSubStr, 1) > 0 Then

УДАЛЕНИЕ ИЗ ЛИСТА СТРОК, КОТОРЫХ НЕТ В СПИСКЕ ЗНАЧЕНИЙ(МНОЖЕСТВЕННЫЕ КРИТЕРИИ)

Т.к. в последнее время стало поступать все больше и больше вопросов как не удалять значения по списку, а наоборот — оставить в таблице только те значения, которые перечислены в списке — решил дополнить статью и таким кодом.
Значения, которые необходимо оставить перечисляются на листе с именем «Лист2». Т.е. указав на «Лист2» в столбце А(начиная с первой строки) несколько значений — после работы кода на листе будут оставлены только те строки, в которых присутствует хоть одно из перечисленных в списке значений. Если лист называется иначе(скажем «Соответствия») в коде необходимо будет «Лист2» заменить на «Соответствия». Удаление строк происходит на активном в момент запуска кода листе. Это значит, что перед запуском кода надо перейти на тот лист, строки в котором необходимо удалить.
В отличие от приведенных выше кодов, данный код ориентирован на то, что значения в списке указаны не полностью. Т.е. если необходимо оставить только те ячейки, в которых встречается слово «активы», то в списке надо указать только это слово. В этом случае если в ячейке будет записана фраза «Нематериальные активы» или «Активы сторонние» — эти ячейки не будут удалены, т.к. в них встречается слово «активы». Регистр букв при этом неважен.

'процедура оставляет в листе только те значения, которые перечислены в списке
Sub LeaveOnlyFoundInArray()
    Dim sSubStr As String   'искомое слово или фраза
    Dim lCol As Long        'номер столбца с просматриваемыми значениями
    Dim lLastRow As Long, li As Long
    Dim avArr, lr As Long
    Dim arr
    Dim IsFind As Boolean
 
    lCol = Val(InputBox("Укажите номер столбца, в котором искать указанное значение", "www.excel-vba.ru", 1))
    If lCol = 0 Then Exit Sub
    Application.ScreenUpdating = 0
    lLastRow = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
    'заносим в массив значения листа, в котором необходимо удалить строки
    arr = Cells(1, lCol).Resize(lLastRow).Value
    'Получаем с Лист2 значения, которые надо удалить в активном листе
    With Sheets("Лист2") 'Имя листа с диапазоном значений на удаление
        avArr = .Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp))
    End With
    'удаляем
    Dim rr As Range
    For li = 1 To lLastRow 'цикл с первой строки таблицы до конца
        IsFind = False
        For lr = 1 To UBound(avArr, 1) 'цикл по списку значений на удаление
            sSubStr = avArr(lr, 1)
            If InStr(1, arr(li, 1), sSubStr, 1) > 0 Then
                IsFind = True
            End If
            DoEvents
        Next lr
        'если значение таблицы не найдено в списке - удаляем строку
        If Not IsFind Then
            If rr Is Nothing Then
                Set rr = Cells(li, 1)
            Else
                Set rr = Union(rr, Cells(li, 1))
            End If
        End If
        DoEvents
    Next li
    If Not rr Is Nothing Then rr.EntireRow.Delete
    Application.ScreenUpdating = 1
End Sub

Чтобы код выше сравнивал значения таблицы со значениями списка по точному совпадению слов, а не по частичному, то надо строку:

If InStr(1, arr(li, 1), sSubStr, 1) > 0 Then

заменить на такую:

If CStr(arr(li, 1)) = sSubStr Then

Для всех приведенных кодов можно строки не удалять, а скрывать. Для этого надо строку:

If Not rr Is Nothing Then rr.EntireRow.Delete

заменить на такую:

If Not rr Is Nothing Then rr.EntireRow.Hidden = True

По умолчанию все коды начинают просмотр строк с первой по последнюю заполненную на листе. И если необходимо удалять строки не с первой или не по последнюю, то надо внести корректировки в эту строку:

For li = 1 To lLastRow 'цикл с первой строки до конца

1 — это первая строка; lLastRow — определяется автоматически кодом и равна номеру последней заполненной строки на листе. Если надо начать удалять строки только с 7-ой строки(например, в первых 6-ти шапка), то код будет выглядеть так:

For li = 7 To lLastRow 'цикл с седьмой строки до конца

А если надо удалять только с 3-ей по 300-ю, то код будет выглядеть так:

For li = 3 To 300 'цикл с третьей строки до трехсотой

Так же см.:
Что такое макрос и где его искать?
Что такое модуль? Какие бывают модули?
Как создать кнопку для вызова макроса на листе
Удаление всех пустых строк в таблице
Удаление пустых столбцов на листе
Установить Быстрый фильтр
Фильтр

Статья помогла? Поделись ссылкой с друзьями!

    Видеоуроки

Поиск по меткам



Access
apple watch
Multex
Power Query и Power BI
VBA управление кодами
Бесплатные надстройки
Дата и время
Записки
ИП
Надстройки
Печать
Политика Конфиденциальности
Почта
Программы
Работа с приложениями
Разработка приложений
Росстат
Тренинги и вебинары
Финансовые
Форматирование
Функции Excel
акции MulTEx
ссылки
статистика

Перед выводом документа Excel на печать пользователю необходимо удалить лишние строки. Если их одна или две, это несложно. Но что делать, когда документ массовый и требует оперативного подхода к форматированию?

Первый способ: удаление одиночных строчек в малом количестве

Для того, чтобы отформатировать документ Excel, не нужно знать сложные функции и формулы. Чтобы удалить несколько строк, сделайте следующее:

1. Предположим, в Excel имеется таблица, в которой присутствует одна лишняя строчка. Чтобы ее удалить, необходимо сделать клик на ячейке строки, от которой нужно избавиться, затем правой кнопкой мыши вызвать контекстное меню. Выбираем пункт «Удалить», а следом «Удалить строки».

1. После этого объект будет удален из таблицы. Также можно выбрать номер строки в начале электронной книги и нажать «Удалить».

1. Можно воспользоваться инструментами, расположенными на панели инструментов. Для этого выделяем строку, которая оказалась лишней в электронной книге. Переходим в рабочую панель, находим блок «Ячейки» во вкладке «Главная». Выбираем инструмент «Удалить», где нажимаем «Удалить строки с листа».

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

1. Если лишние строки располагаются друг за другом, можно сделать выделение мышью, затем воспользоваться кнопкой «Удалить». Здесь важно правильно выбрать «удалить строки с таблицы» или «Удалить строки с листа».
2. Что делать, если строки расположены через одну или в любом другом хаотичном порядке на листе? Зажимаем клавишу «Ctrl» и левой кнопкой мыши делаем клики по необходимым строкам.

1. По таблице хорошо видно, какие строчки отметились. Далее, чтобы их исключить из электронной книги, делаем вызов контекстного меню и нажимаем кнопку «Удалить».

Как видите, появляется только возможность «Удалить строки». После проделанных действий можно оформлять таблицу для отправки.

Третий способ: удаление пустых лишних строк

Если после обработки электронной таблицы остались пустые строки, их тоже необходимо удалить.

1. Для этого находим все пустые строки во всем диапазоне таблицы. Переходим во вкладку «Главная», затем в блок «Найти и выделить», выбираем инструмент «Выделить группы ячеек».

1. В появившемся небольшом окне необходимо переставить флажок напротив записи «Пустые ячейки», затем нажать на кнопку «Ок». Все необходимые строки выделены фоном.

1. Далее во вкладке «Главная переходим к блоку «Ячейки» и нажимаем «Удалить».

Четвертый способ: применение инструмента «Сортировка»

Когда для оформления документа есть конкретные условия, воспользуйтесь сортировкой для исключения ненужных строк.

1. Выделяем ту область таблицы, которую необходимо отсортировать и оставить неизменной. Затем переходим во вкладку «Главная», перемещаемся к блоку «Сортировка и фильтр». Затем выбираем «Настраиваемая сортировка».

1. В открывшемся окне выставляем все необходимые параметры, как показано на фото, и нажимаем кнопку «Ок». В каждом конкретном случае сортировка может выполняться по-другому.

1. Оставшиеся строки можно удалить при помощи способов, рассмотренных выше.