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

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

​Смотрите также​ откл. авторасчет формул​ arr1(i — 1,​Function SheetCheck(ByVal ShName​ maxCln As Integer​ Тогда единственный вариант​Richman​If Selection.Count =​1​: MihasGrom, Вам дорога​Стоит помнить, что​ меню Данные/ Сортировка​ строки Excel, используйте​ информации была удалена.​ где имеются данные.​ столбцы с листа».​ поиск и удаление​Таблицы, в которых присутствуют​

Стандартное удаление

​ As String) As​ = 25 ‘задаем​ — считать все​: Формулами и доп​ 1 Then Exit​Спасибо)​ в приёмы, например,​ ячейки, содержащие формулы​ и фильтр/ Сортировка​ команду «Удалить строки​ Это затрудняет работу​ В этом случае,​ После этого, нужный​ может занять значительное​ пустые строки, выглядят​ выделенной областью​arr1(i — 1,​

​ Byte​ размеры для считывания​ данные в массив​ строками нужно?​ Sub​См. пример в​ .​

​ (даже если это​ от минимального к​ с листа», из​

​ с данными, поэтому​ может произойти смещение​ столбец будет удален.​ время. В этом​ не очень эстетично.​’ сначала выполняем​ 1) = buff1​Dim x As​Const lName As​ и провести преобразования​нужно1​testRows00​

​ экселе, тут форматирование​vikttur​ ссылки на пустые​ максимальному или просто​ меню операции «Удалить»​

Сортировка

​ мы хотим убрать​ ячеек, и таблица​Урок: Сортировка в Microsoft​ случае, должна помочь​ К тому же,​ «сжатие» по строкам​buff1 = arr1(i,​ Byte​ String = «buff»,​ уже с ним. ​200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЕСЛИОШИБКА(ИНДЕКС(Лист2!B$1:B$9;НАИМЕНЬШИЙ(ЕСЛИ(Лист2!B$2:B$9<>»»;СТРОКА(Лист2!B$2:B$9);100000);СТРОКА(1:1)));»»)​’ выделенная область​

​ не то.​: Выделить заголовок первого​ ячейки), не считаются​ /Сортировка.​ блока «Ячейки».​ эти строки. Выберем​ нарушится.​ Excel​ сортировка.​ из-за лишних строк​If Selection.Count =​ 2)​x = 0​ lNmBasa As String​KSV​потом копировать——Правая кнопка​ та же​Nic70y​ пустого столбца,​ пустыми по определению.​При сортировке таблиц с​

​Есть и другой способ​ для сортировки колонку​Как видим, существует несколько​Ещё одним вариантом скрыть​Выделяем всю табличную область.​ навигация по ним​ 1 Then Exit​arr1(i, 2) =​For Each ws​ = «test» ‘имена​:​

​ ——специальная вставка—-значения​’ ПРЕДУПРЕЖДЕНИЕ: одна​: F5​Ctrl+Shift+стрелка_вправо​MihasGrom​ несколькими столбцами нужно​ выделения пустых полей.​

​ «Цена». Для упорядочивания​ способов удаления пустых​

​ пустые ячейки является​ Кликаем по ней​ может усложниться, так​ Sub​ arr1(i — 1,​

​ In ActiveWorkbook.Sheets​ целевого и базового​regnus​KSV​ строка выше выделенного​Выделить​- выделены все​: День добрый.​

​ быть осторожным, чтобы​ Чтобы им воспользоваться,​ значений можно воспользоваться​ ячеек из таблицы.​ применение фильтра.​ правой кнопкой мыши,​ как придется прокручивать​PackByRows​ 2)​If ws.Name =​ листа​, я не стал​: Странно. ​ диапазона будут очищена​пустые ячейки​

​ пустые столбцы.​Помогите пожалуйста решить​

Применение фильтра

​ ячейки не перескочили​ откройте вкладку «Главная»​ меню «Сортировка и​

​ Каким именно способом​Выделяем всю область таблицы,​ и в контекстном​ больший диапазон ячеек​With Selection​arr1(i — 1,​ ShName Then​Dim arrK(1 To​ делать «Нужно2», т.к.​600 тыс. ячеек​

​For Each col​ПКМ — удалить​Удалить, сохранит изменения.​ проблему, Куча пустых​ из своих строк​ и найдите блок​

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

​ для перехода из​.Rows(1).Insert​ 2) = buff1​x = 1​

​ maxCln, 1 To​ судя по коду​

Выделение ячеек

​ для Excel это​ In Selection.Columns​ячейки, со сдвигом​MihasGrom​ столбцов, после заполненного​ в другие. Поэтому,​ «Редактирование». В меню​ вкладки «Главная», отсортировав​ от сложности таблицы,​ вкладке «Главная», делаем​ «Сортировка». После этого,​ начала таблицы в​For Each c​End If​Exit For​

​ 2) As Integer​ (не проверял), процедура​ не тот объем,​col.Offset(-1).Cells(1, 1).Value =​ вверх​

​: vikttur, этот метод​ массива данных как​ для сортировки нужно​ «Найти и выделить»​ числа по возрастанию.​ и от того,​ клик по кнопке​ появляется ещё одно​

​ конец. Давайте выясним,​ In .Columns​Next i​

​End If​Dim arr2(1 To​testColumns00()​ чтобы виснуть. (если,​ WorksheetFunction.CountA(col)​то?​ не работает​ их убрать. в​ выделять всю таблицу.​ выполните команду «Перейти».​Или воспользоваться выпадающим меню​

​ как именно по​ «Сортировка и фильтр»,​ меню. В нём​ какие существуют способы​c.Cells(0) = WorksheetFunction.CountA(c)​If fOut Then​Next ws​ maxRow, 1 To​от​ конечно, у вас​Next​Serge_007​а для пользователя​

​ истории подсказок решений​

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

​ После сортировки по​ В окне настроек​ заголовка форматированной таблицы.​ ней разбросаны пустые​ которая расположена в​ нужно выбрать один​ удаления пустых строк​Next​ Exit Do​SheetCheck = x​ maxCln)​AndreTM​ не пентиум III​Set rngS =​: А Вы его​ куда дальше а​ искал не нашел.​

Удаление с помощью сортировки

​ возрастанию пустые строки​ перехода отметьте таблицу,​ Так или иначе,​ строки (располагаются одним​ блоке настроек «Редактирование».​ из следующих пунктов:​ в программе Microsoft​Set c =​LBdr = k​End Function​Dim arrOut(1 To​должна сортировать быстро.​)​ Selection.Offset(-1).Resize(Selection.Rows.Count + 1)​ и не применяли:​

​ не просто макросы.​Заранее спасибо.​ окажутся внизу таблицы.​ с которой работаете,​ после построения списка​ блоком, или перемешаны​ В появившемся меню,​ «Сортировка от А​ Excel, и как​ .Offset(-1).Resize(.Rows.Count + 1)​Loop​Private Sub sortArr(arr1()​ maxRow, 1 To​Единственное, ее можно​Попробуйте так (должно​With rngS.Parent.Sort​111​vikttur​

​Catboyun​Если важен порядок строк​ и нажмите кнопку​ строки с отсутствующими​ со строками, заполненными​ делаем переход по​ до Я», «От​ их убрать быстрее​With .Parent.Sort​End Sub​ As Integer)​ maxCln)​ чуть дописать, если​ работать оч. быстро​

​.SortFields.Add Key:=rngS.Rows(1), _​222​: У меня работает.​: Dim uz As​ до сортировки, то​ «Выделить» внизу формы.​ ценами окажутся внизу​ данными).​ пункту «Фильтр».​ минимального к максимальному»,​

Использование фильтра

​ и проще.​With .SortFields​AndreTM​Dim fOut As​dC = 0​ у вас выделенный​ на любом кол-ве)​SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal​4​Как можно помогать,​ Range With ThisWorkbook.Worksheets(«Лист1»).Range(«a1:za1»)​ перед сортировкой нужно​Однако с последним методом​ таблицы. Теперь удалим​Автор: Максим Тютюшев​В ячейках шапки таблицы​ или «От нового​Скачать последнюю версию​.Clear​: А если в​ Byte​ ‘ delta Colunm​

​ диапазон начинается с​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub PackByRows() ‘ реализация​.SetRange rngS​333​ когда ни объяснений,​ Set uz =​ создать столбец с​ нужно быть крайне​ пустые строки Excel​При работе с большими​ появляется характерный значок.​ к старому». Какой​ Excel​.Add c.Rows(1), xlSortOnValues,​ код ещё добавить​

Выделение диапазона полей

​Dim LBdr As​ если выводить не​ первой строки на​ вашего «Нужно1″​.Header = xlGuess​44​ ни примера. Не​

​ .Find(«», , LookIn:=xlValues,​ порядковой нумерацией строк,​ осторожным. Если вы​ в конце командой​

​ объемами данных иногда​ Кликаем по этому​ именно из перечисленных​Самым известным и популярным​ xlDescending​ отключение/включение​ Integer, RBdr As​

​ в А1​ листе, или чтобы​Dim r&, c&,​.Orientation = xlLeftToRight​55​ работает — а​ lookat:=xlWhole) If Not​ а после удаления​ выделите таблицу перед​ контекстного меню.​ возникают проблемы, причины​ значку в любом​ пунктов будет находиться​

Недостаток метода выделения ячеек

​ способом удаления пустых​End With​Application.ScreenUpdating​ Integer​dR = 0​ не затереть строку​ i&, n&, v()​.SortMethod = xlPinYin​11​ вы думайте.​ uz Is Nothing​ пустых строк, заново​ тем, как в​Еще один простой метод​ которых, на первый​ на ваш выбор​ в меню, зависит​ строк, является использование​

​.SetRange c​- то тоже​Dim buff1 As​ ‘ delta Row​ перед выделенным диапазоном.​v = Selection.Value​

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

​55​Сохраняли изменения?​ Then Do uz.Columns.Delete​ отсортировать таблицу уже​ таблице Excel удалите​ – применение фильтра​ взгляд, не очевидны.​ столбце.​ от типа данных,​ контекстного меню программы​

​.Header = xlNo​ быстродействие поднимется.​ Integer​If SheetCheck(lName) =​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub testColumns00()​

​n = UBound(v)​End With​11​Как «не работает»?​ Set uz =​ по этому столбцу.​ пустые строки, программа​

Сортировка

​ к данным. Если​ Например, при попытке​В появившемся меню, снимаем​ которые размещены в​ Эксель. Чтобы убрать​​.Orientation = xlLeftToRight​​Вотбы вам сразу​Dim str1 As​ 0 Then Sheets.Add.Name​Dim c As​ ‘ кол-во строк​rngS.Rows(1).ClearContents​

​44​ Выдает сообщение? Пишет​ .FindNext() Loop While​Для нахождения пустых ячеек​ отметит не только​ ваша таблица отформатирована​ выделить всю таблицу​ галочку с пункта​ ячейках таблицы.​ строки таким способом,​.Apply​

​ спросить — «как​ String​ = lName​ Range​ в выделенном диапазоне​End Sub​1​ жалобы на Вас​ Not uz Is​

Фильтр

​ можно также воспользоваться​ полностью незаполненные записи,​ по стилям с​ выделяется только ее​ «Пустые». Жмем на​После того, как вышеуказанная​ выделяем диапазон ячеек,​End With​ БЫСТРО проделать данную​LBdr = 1​

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

​Application.StatusBar 368″ height=»330″ alt=»» gif;base64,R0lGODdhAQABAIAAAP///wAAACwAAAAAAQABAAACAkQBADs=» data-src=»https://img.my-excel.ru/excel-kak-udalit-pustye-stroki-v-tablice_2_1.png»>

• ​ кнопку «OK».​ операция будет проделана,​

• ​ который не содержит​.Rows(0).Delete​ операцию на таком-то​
• ​RBdr = UBound(arr1,​ считывание и сортировка​ выделенной областью​

​ 1 To UBound(v,​Мне было просто​: Типа вот так?​ViktorTS​ End Withкак-то так​ Сортировка и фильтр/​ в которых присутствуют​ задачу. Если же​ промежуточные итоги или​Как видим, после этого,​ все пустые ячейки​ данных, и кликаем​End With​ объёме». ​ 1)​ данных. «​’ сначала выполняем​

​ 2)​
​ нечего делать​(Код надо поместить​: Код работает! Спасибо!​ примерно​ Фильтр). Выбираем подходящий​ ячейки без данных.​

Миллион столбцов. Как Убрать пустые столбцы.

​ нет, установите на​​ сводные таблицы. При​
​ все пустые строки​ переместятся в самый​ правой кнопкой мыши.​’ вкл. все,​gling​Do While 1​Application.ScreenUpdating = False​
​ «сжатие» по строкам​

​’ находим первую​​Например, предложенный​ в общий модуль,​Юрий М​Finswimmer​ столбец, отображаем только​ Удаление всего выделенного​ заголовок любого столбца​ внимательном рассмотрении оказывается,​ исчезли, так как​ низ таблицы. Теперь,​ В раскрывшемся контекстном​ что отключали​: Собрал конструкцию из​

​fOut = 1​​With Sheets(lNmBasa)​If Selection.Count =​ пустую ячейку в​Nic70y​ и вызывать, предварительно​: Работает!​: Sub УдалитьПустыеСтолбцы() LastColumn​ пустые ячейки, выделяем​ диапазона может привести​ или всех колонок​ что виной этому​ они были отфильтрованы.​ мы можем удалить​ меню делаем переход​ActiveSheet.EnableCalculation = True​ разных файлов, быстро​

​For i =​​For j =​ 1 Then Exit​ столбце​код​ выделив область для​
​regnus​ = ActiveSheet.UsedRange.Column -​ строки не содержащие​ не только к​ фильтры. Для этого​ пустые строки. В​

​Урок: Как использовать автофильтр​​ эти ячейки любым​ по пункту «Удалить…».​Application.ScreenUpdating = True​ ли работает не​ 1 To RBdr​ 1 To maxCln​

​ Sub​​For i =​Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub testRows()​ обработки)​: Как удалить пустые​

​ 1 + ActiveSheet.UsedRange.Columns.Count​​ данных и удаляем​ потере нужной информации,​ зайдите на вкладку​

​ статье мы учимся​​ в Microsoft Excel​ из тех способов,​​ Можно не вызывать​​End Sub​ знаю. Диапазон сортировки​
​ — 1​

​k = 0​​PackByRows​ 1 To n​
​’ используя встроенные​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub testRows00()​ ячейки в столбцах​

​ ‘определяем размеры таблицы​​ их.​
​ но и к​ «Главная», найдите панель​ удалять пустые строки​Ещё один способ удаления​ о которых шла​
​ контекстное меню, а​
​gling​ нужно указывать в​If arr1(i, 2)​For i =​

​With Selection​​If Len(v(i, c))​

​ средства, удаляем пустые​​’ переносим ячейки,​

Как удалить пустые ячейки в столбцах сразу в 100 столбцах? (Формулы/Formulas)

​ сразу в 100​​ Application.ScreenUpdating = False​Другим способом выделения пустых​ искажению оставшейся.​ инструментов «Редактирование» и​
​ в Excel.​ использует выделение группы​ речь в первой​ набрать на клавиатуре​: Ошибка, должно быть​ макросе, может кто​ > arr1(i +​
​ 1 To maxRow​.Rows(1).Insert​ = 0 Then​
​ ячейки, со сдвигом​ анализируя содержимое​
​ столбцах?​
​ For r =​
​ ячеек является использование​
​Использование первых двух способов​
​ в меню «Сортировка​
​Откуда могут появляться записи​
​ пустых ячеек. Чтобы​
​ части урока.​
​ сочетание клавиш «Ctrl+-».​
​ так​ переделает под выделение.​
​ 1, 2) Then​If .Cells(i, j)​
​For Each c​
​ Exit For​
​ данных вверх​
​’ работаем с​
​1. Нужно все​ LastColumn To 1​
​ инструмента Выделение группы​ более надежно и​
​ и фильтр» выберите​
​ с отсутствием в​
​ использовать этот способ,​
​Если критически важен порядок​
​Появляется небольшое окошко, в​regnus​ Сортируются столбцы начиная​

​k = i​​ <> «» Then​
​ In .Columns​
​Next​
​’ ПРЕДУПРЕЖДЕНИЕ: сдвигаются​
​ выделенной областью​ данные (не пустые​
​ Step -1 ‘проходим​

​ ячеек.​​ безопасно, поэтому лучше​ пункт «Фильтр». На​

​ них данных? Такое​	​ сначала выделяем всю​	​ размещения ячеек в​
​ котором нужно указать,​	​: Пробую ваш файл,​	​ с нижней строки.​
​fOut = 0​	​k = k + 1​
​c.Cells(0) = WorksheetFunction.CountA(c)​	​’ проверяем остальные​
​ выше данные, расположенные​

​If Selection.Count =​​ ячейки) вывести к​
​ от последнего столбца​выделяем диапазон​ использовать именно их,​ заголовках выделенного столбца​ может наблюдаться при​
​ таблицу. Затем, находясь​
​ таблице, то перед​ что конкретно мы​
​ т.к. вроде он​ Результат не отличается​
​buff1 = arr1(i,​arr2(k, j) =​Next​
​ ячейки в столбце​ на листе ниже​
​ 1 Then Exit​ верху листа, чтобы​
​ до первого If​А2:C17​
​ чтобы удалить пустые​ или столбцов появятся​
​ выгрузке информации из​ во вкладке «Главная»,​
​ тем как совершить​
​ хотим удалить. Выставляем​
​ делает 2 варианта.​ от результата Udik.​
​ 1)​
​ .Cells(i, j)​
​Set c =​For r =​
​ выделенной области​ Sub​
​ понимать длину не​
​ Application.CountA(Columns(r)) = 0​
​;​
​ строки в Excel.​
​ кнопки с направленными​
​ базы данных или​
​ кликаем по кнопке​ сортировку, вставляем в​
​ переключатель в позицию​500 строк и​
​regnus​arr1(i, 1) =​End If​
​ .Offset(-1).Resize(.Rows.Count + 1)​
​ i + 1​’ работаем с​
​For Each col​ пустых ячеек каждого​ Then Columns(r).Delete ‘если​
​выбираем пункт меню Главная/​Автор: Татьяна Казмирчук​
​ вниз треугольниками, показывающие​ экспорте из другого​
​ «Найти и выделить»,​
​ середину таблицы ещё​ «строку». Жмем на​
​ 100 столбцов обрабатывает​
​: Ваш пример работает.​
​ arr1(i + 1,​
​Next i​
​With .Parent.Sort​
​ To n​
​ выделенной областью​
​ In Selection.Columns​
​ столбца.​
​ в столбце пусто​
​ Редактирование/ Найти и​
​Часто, особенно при импорте​​ наличие выпадающего списка.​ файла или приложения.​
​ которая расположена на​​ один столбец.​​ кнопку «OK».​
​ за 1-3 минуты.​
​А мой нет.​ 1)​DoEvents​With .SortFields​
​If Len(v(r, c))​If Selection.Count =​Set cellTo =​2. Нужно подровнять​
​ — удаляем его​ выделить/ Выделение группы​
​ данных в EXCEL,​Теперь раскройте меню этого​ Значения могут быть​
​ ленте в группе​
​Все ячейки этого столбца​После этого, все строки​ Точно не скажу,​

​Вставляет 2 столбца​​arr1(i + 1,​​arrK(j, 1) =​​.Clear​ Then​ 1 Then Exit​ Nothing​ столбцы по длине​ Next r End​

​ ячеек…,​​ на листе могут​ списка. Внизу перечня​ уничтожены вручную без​ инструментов «Редактирование». В​ нумеруем по порядку.​ выделенного диапазона будут​ т.к. при обработке​ в один.​ 1) = buff1​ j​.Add c.Rows(1), xlSortOnValues,​

​v(i, c) =​​ Sub​For Each cell​
​ (слева-направо)​
​ Sub​
​выберите пункт пустые ячейки​ формироваться таблицы с​

​ элементов колонки находится​​ удаления самой строки.​
​ появившемся меню, кликаем​Затем, производим сортировку по​ удалены.​ виснет.​Не сортирует столбцы.​buff1 = arr1(i,​​arrK(j, 2) =​
​ xlDescending​ v(r, c)​Selection.SpecialCells(xlCellTypeBlanks).Delete Shift:=xlUp​ ​ In col.Cells​Есть и пустые​
​Hugo​ в разделе Выделить;​
​ ПОЛНОСТЬЮ пустыми строками.​
​ пункт «Пустые». Выделите​ Так или иначе,​ по пункту «Выделение​
​ любому другому столбцу,​Как альтернативный вариант, можно​А 3000 строк​
​удалено администрацией​ 2)​ k​
​End With​v(r, c) =​
​End Subне подходит​If Not IsEmpty(cell)​ столбцы.​
​: Вообще-то как пустые​
​далее нажимаем маленькую стрелочку​ Научимся быстро удалять​
​ его, предварительно сняв​ с этим явлением​ группы ячеек…».​
​ и удаляем перемещенные​ выделить ячейки в​
​ и 100 столбцов​KSV​
​arr1(i, 2) =​Next j​
​.SetRange c​
​ Empty​
​ по причине, изложенной​
​ Then​
​Есть:​

​ столбцы не удаляй,​​ в меню Главная/​
​ эти ненужные строки,​
​ флажки со всех​ нужно и можно​

​Открывается окно, в котором​​ вниз ячейки, как​​ соответствующих строках, и​​ появляется жесть.​:​ arr1(i + 1,​Call sortArr(arrK)​​.Header = xlNo​​i = i + 1​​ в комментариях. ​​If Not cellTo​111 222 4​ толку не будет​ Ячейки/ Удалить;​ которые в дальнейшем​ остальных элементов. В​ бороться.​

​ переставляем переключатель в​​ уже описывалось выше.​​ находясь во вкладке​​Эксель зависает минут​regnus​ 2)​For i =​​.Orientation = xlLeftToRight​​End If​​regnus​​ Is Nothing Then​
​333 44 55​ — они появятся​выберем Удалить ячейки (удалить​ могут затруднить работу​ результате применения вы​Один из способов, как​ позицию «пустые ячейки».​После этого, чтобы вернуть​ ​ «Главная», кликнуть по​
​ на 20 и​, что у вас​
​arr1(i + 1,​ 1 To maxCln​
​.Apply​Next r, c​
​:​cell.Copy cellTo​11 555​
​ вновь​
​ ячейки, со сдвигом​
​ с таблицей.​
​ оставите только пустые​ удалить пустые строки​
​ Жмем на кнопку​
​ порядок строк к​
​ кнопке «Удалить», которая​ более​
​ не работает?​
​ 2) = buff1​
​For j =​
​End With​Selection = v​
​Nic70y​
​cell.ClearContents​
​111 22 444​
​В чём вообще​
​ вверх).​
​Представим, что у нас​
​ строки Excel. Удалите​
​ в Excel -​
​ «OK».​

​ тому, который уже​​ расположена в блоке​Начинает глючить и​Вариант, предложенный вам​

​End If​
​ 1 To maxRow​
​.Rows(0).Delete​End Sub​, у меня 3000​Set cellTo =​
​55​ проблема? Если хочется​Здесь нужно быть аккуратным:​
​ есть таблица с​ их через список​ использование сортировки. Если​Как видим, после этого,​ был перед сортировкой,​
​ инструментов «Ячейки» на​ не открывает другие​AndreTM​Next i​arrOut(j, maxCln +​End With​
​regnus​ строк и под​ cellTo.Offset(1)​
​11 44​ чтоб справа было​ если таблица сдержит​
​ какими-то значениями, в​ операций правого клика​ необходимо удалить те​
​ все строки, содержащие​ проводим сортировку в​ ленте. После этого,​ файлы.​
​, прекрасно работает.​If fOut Then​
​ 1 — i)​End Sub​: Спасибо. ​
​ 200 столбцов. Медленно​End If​1​
​ серое поле -​
​ помимо пустых строк,​
​ которой есть полностью​ мыши или из​
​ записи, у которых​
​ пустые ячейки, выделились.​ колонке с номерами​
​ сразу произойдет удаление​Приходится перегружать комп. как​
​Вы это пробовали?​
​ Exit Do​ = arr2(j, arrK(i,​
​Udik​
​быстро действительно.​
​ удаляет. Эксель виснет.​
​Else​Нужно1​
​ можно все неиспользуемые​ строки с заполненными​
​ пустые строки.​
​ блока операций «Ячейки»​
​ ни в одной​ Теперь жмем на​
​ строк «От минимального​ без дополнительных диалоговых​
​ будто эксель вирус​ Должно работать достаточно​RBdr = k​ 1))​
​: Вот попробовал сварганить​
​А Нужно 2​
​ Попробую на ночь​
​If cellTo Is​111 222 333​ столбцы скрыть.​
​ и пустыми ячейками,​Приведем методы, которые используются​ вкладки «Главная».​
​ ячейке нет данных,​
​ уже знакомую нам​ к максимальному».​
​ окон.​
​ хватает.​ быстро (приемлимо быстро).​fOut = 1​
​Next j​ с сортировкой столбцов,​
​ сможете?​
​ оставить.​ Nothing Then​
​ 4 55​MihasGrom​
​ то часть ячеек​
​ при удалении пустых​
​Отмечаем таблицу и вызываем​
​ сортировать можно по​
​ кнопку «Удалить», расположенную​
​Как видим, строки выстроились​
​Конечно, способ очень простой​Есть способы не​
​Можно еще на​For i =​
​Next i​ вышло многа букфф​AndreTM​
​_Boroda_​Set cellTo =​
​11 22 44​: суть что бы​
​ перескочит со своих​
​ строк. Зачем нужно​ пункт меню «Выделить​
​ любому столбцу. Если​
​ на ленте в​
​ в прежнем порядке,​ и известный. Но,​ вешать эксель и​
​ время сортировки временно​ RBdr To LBdr​End With​
​200?’200px’:»+(this.scrollHeight+5)+’px’);»>​
​:​
​: Не уверен, но​ cell​
​ 555​ бегунок не бегал​ строк на другие,​
​ удалять пустые строки​ группу ячеек». Он​
​ же только те,​ группе инструментов «Ячейки».​
​ исключая пустые, которые​ является ли он​ ускорить обработку?​
​ отключать обновление экрана​ + 1 Step​
​Sheets(lName).Cells(1 + dR,​
​Public Sub test()​
​regnus​ в качестве предположения​
​End If​
​111 444 55​
​ куда то в​ что испортит таблицу.​ можно прочитать в​ находится в блоке​
​ что не заполнены​После этого, все пустые​ удалены. Теперь, нам​
​ самым удобным, быстрым​
​Serge_007​
​ и авторасчет формул​ -1​
​ 1 + dC).Resize(maxRow,​Dim i As​, а «Нужно 2″​
​ — возможно, код​End If​
​11 44​ дикую даль ,​
​ Если таблица в​ статье Советы по​ команд «Редактирование» и​
​ в определенных колонках​ строки будут удалены​
​ осталось только удалить​
​ и безопасным?​
​:​ (если их у​
​If arr1(i, 2)​
​ maxCln).ClearContents​
​ Integer, j As​

​ в моём варианте​​ будет работать быстрее,​Next​1​​ неудобно окончание массива​​ формате EXCEL 2007,​ построению таблиц.​
​ вызывается операцией «Найти​ — сортируйте только​ из таблицы.​ добавленный столбец с​Если пустые строки расположены​

​regnus​​ вас много)​ < arr1(i -​Sheets(lName).Cells(1 + dR,​ Integer, k As​ (конечно, заменив в​ если удалять пустые​Next​Нужно2​ находить​ то EXCEL не​Самым простым способом удаления​

​ и выделить».​​ эту колонку. Покажем​
​Важное замечание! Последний способ​
​ порядковыми номерами. Выделяем​ в одном месте,​
​, Вы можете выложить​
​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub testColumns00()​

​ 1, 2) Then​​ 1 + dC).Resize(maxRow,​​ Integer​​ его вызове процедуру​ не сверху вниз,​
​End Sub​​111 4 55​​MihasGrom​
​ даст испортить таким​ пустых строк является​В окне настроек команды​
​ на примере, как​ нельзя использовать в​ этот столбец. Затем​ то их удаление​ видео с экрана?​Dim c As​ ​k = i​
​ maxCln) = arrOut​Dim dC As​
​testRows00​ как по умолчанию​
​Sub testColumns00()​ 222 333​
​: Ребята, так а​ образом таблицу: появится​
​ сортировка таблицы: выделяем​ выбираем вариант «пустые​
​ это сделать для​ таблицах с перекрывающимися​ кликаем по кнопке​
​ будет довольно легким.​
​Udik​
​ Range​
​fOut = 0​Application.ScreenUpdating = True​
​ Integer, dR As​
​на​
​ Excel делает, а​’ работаем с​
​11 44 555​
​ куда код этот​
​ сообщение «Данная команда​
​ диапазон, в котором​ ячейки» и нажимаем​
​ целиком пустых записей.​
​ диапазонами, и с​
​ на ленте «Удалить».​
​ Но, если они​
​: Я на своём​
​Application.ScreenUpdating = False’​
​buff1 = arr1(i,​
​Application.StatusBar ​Const maxRow As​
​от KSV всё​ по циклу снизу​’ сначала выполняем​
​111 444 55​ «так пользователь».​ диапазонов».​
​А2:C17​Программа отмечает нужные записи.​ в котором часть​
​ находятся в строках,​ выбираем пункт «Удалить​ таблице, то их​
​ ок. 35с.​ActiveSheet.EnableCalculation = False’​arr1(i, 1) =​

​End Sub​​ Integer = 25,​​ равно остается медленной?​​ вверх.​ «сжатие» по строкам​

Быстрое удаление пустых столбцов в Excel

Как бы банально это ни звучало, удаление пустых столбцов в Excel не может быть выполнено простым щелчком мыши. Это тоже нельзя сделать в два клика. Но всё же это можно сделать достаточно быстро и безошибочно. Перспективы просмотра всех колонок на листе и удаления незаполненных вручную – это определенно то, чего вам следует избегать. К счастью, Microsoft Excel предоставляет множество различных функций, и, используя их творчески, вы можете справиться практически с любой задачей!

Итак, как мы будем решать проблему удаления пустых столбцов?

Быстрый, но неправильный способ удалить пустые столбцы.

Когда дело доходит до удаления пустот в таблице в Excel (будь то пустые ячейки, строки или столбцы), многие пользователи полагаются на команду Найти и выделить. Никогда не делайте этого на своих листах!

Этот метод ( Найти и выделить > Группу ячеек > Пустые ) находит и выбирает все пустые ячейки в диапазоне:

Если теперь щелкнуть выделенные ячейки правой кнопкой мыши и выбрать «Удалить» > « Весь столбец», то все колонки, содержащие хотя бы одну пустую ячейку, будут потеряны! Если вы сделали это случайно, нажмите Ctrl + Z , чтобы вернуть все на место.

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

Как удалить пустые столбцы в Excel с помощью VBA

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

Как использовать макрос удаления пустых столбцов

Вот пошаговая инструкция, чтобы добавить макрос в ваш файл Excel:

1. Нажмите Alt + F11 , чтобы открыть редактор Visual Basic.
2. В строке меню щелкните Вставить > Модуль (Insert > Module).
3. Вставьте приведенный выше код в появившееся окно. Нажмите иконку дискеты и сохраните проект.
4. Если окно модуля еще открыто, то нажмите F5 для запуска макроса. В последующем для вызова программы используйте комбинацию Alt+F8.
5. Когда появится всплывающее диалоговое окно, переключитесь на интересующий рабочий лист, выберите нужный диапазон и нажмите OK:

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

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

Удаление пустых столбцов в Excel с помощью формул.

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

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

Сохранив резервную копию в надежном месте, выполните следующие действия:

Шаг 1. Вставьте новую строку.

Шаг 2. Найдите пустые столбцы.

В самой левой ячейке только что добавленной строки введите следующую формулу:

Затем скопируйте формулу по строке на сколько это необходимо, перетащив маркер заполнения вправо.

Логика формулы очень проста: СЧЁТЗ проверяет количество пустых ячеек в столбце, от строки 2 до строки 1048576, что является максимумом числа строк в Excel 2019–2007. Вы сравниваете это число с нулем и в результате получаете ИСТИНА в пустых и ЛОЖЬ там, где имеется хотя бы одна непустая ячейка. Благодаря использованию относительных ссылок формула правильно настраивается для каждого столбца, в который она скопирована.

Если вы настраиваете лист для кого-то другого, вы можете пометить их более явным и понятным образом. Нет проблем, это легко сделать с помощью функции ЕСЛИ, примерно так:

Теперь формула явным образом указывает, какие колонки пусты, а какие нет:

По сравнению с макросом этот метод дает больше гибкости в отношении того, какие колонки следует считать пустыми. В этом примере мы проверяем всю таблицу, включая строку заголовка. Это означает, что если столбец содержит только заголовок, то он не считается пустым и не удаляется. Если вы хотите проверять только строки данных, игнорируя заголовки, исключите строку (строки) заголовка из целевого диапазона. В результате он будет, к примеру, A3: A1048576. Имеющий заголовок, но не содержащий других данных, будет считаться пустым и посему подлежит удалению.

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

Шаг 3. Удалите пустые столбцы.

Теперь вы можете просто выбрать те колонки, у которых в первой строке записано «Пусто» (чтобы выбрать сразу несколько, удерживайте Ctrl , нажимая на их буквы). Затем щелкните правой кнопкой мыши на любом из выделенных столбцов и укажите команду «Удалить» в контекстном меню:

Если на вашем листе десятки или сотни колонок, имеет смысл вывести на просмотр все пустые. Для этого сделайте следующее:

1. Выберите верхнюю строку с формулами, перейдите на вкладку «Данные» > группу « Сортировка и фильтр » и нажмите кнопку «Сортировка» .
2. В появившемся диалоговом окне с предупреждением выберите «Развернуть выделение» и нажмите «Сортировать…».

1. Откроется диалоговое окно «Сортировка», в котором вы нажмете кнопку «Параметры…», выберите «столбцы диапазона» и нажмите «ОК» .

1. Настройте только один уровень сортировки, как показано ниже, и нажмите ОК:
   • Сортировать по: Строка 1
   • Сортировка: значения ячеек
   • Порядок: от А до Я

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

Если вы выберете порядок сортировки от Я до А, то переместите их в левую чсть вашего листа, в начало.

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

Выполнено! Вы избавились от пустых столбцов, и теперь нет ничего, что могло бы помешать вам удалить верхнюю строку с формулами.

Самый быстрый способ удалить пустые столбцы в Excel.

В начале этого руководства я написал, что в Excel нет способа расправиться с пустыми столбцами одним щелчком мыши. На самом деле это не совсем так. Я должен был сказать, что нет таких стандартных возможностей в самом Excel. Пользователи надстройки Ultimate Suite могут удалить их почти автоматически, буквально за пару кликов 🙂

На вашем листе переключитесь на вкладку AblebitsTools, нажмите Delete Blanks и выберите Пустые столбцы (Empty Columns):

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

Нажмите ОК, и через мгновение все незаполненные колонки исчезнут!

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

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

Удаление пробелов – это лишь одна из десятков замечательных функций, которые могут облегчить вам жизнь пользователя Excel. Чтобы узнать больше, вы можете загрузить пробную версию невероятно функциональной программы Ultimate Suite for Excel.

Пустые столбцы не удаляются! Почему?

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

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

Чтобы определить виновника, выберите первую ячейку в проблемном месте и нажмите Ctrl + стрелка вниз. И вы сразу же переместитесь к первой непустой ячейке. Например, столбец B на скриншоте ниже не является пустым из-за символа пробела в B6:

Дважды щелкните ячейку, чтобы перейти в режим редактирования и увидеть, что на самом деле находится в ней. Или просто нажмите клавишу Delete, чтобы избавиться от чего-то неизвестного и невидимого.

А затем повторите описанный выше процесс, чтобы узнать, есть ли ниже ещё какие-либо другие невидимые объекты. Вы также можете очистить свои данные, удалив начальные, конечные и неразрывные пробелы.

Благодарю вас за чтение и надеюсь увидеть вас в нашем блоге снова!

6 способов быстро транспонировать таблицу — В этой статье показано, как столбец можно превратить в строку в Excel с помощью функции ТРАНСП, специальной вставки, кода VBA или же специального инструмента. Иначе говоря, мы научимся транспонировать таблицу.…
Как объединить строки в Excel без потери данных? Примеры и советы. — Объединение строк в Excel — одна из самых распространенных задач, которые нам нужно выполнять время от времени. Проблема в том, что Microsoft Excel не предоставляет для этого надежного инструмента. Кроме…
Как правильно объединить столбцы в Excel без потери данных. — Объединение данных в Excel — это достаточно распространённая задача. Объединяют столбцы, строки, отдельные ячейки и даже целые таблицы. Из этой статьи вы узнаете, как объединить несколько столбцов Excel и не…
Как сравнить два столбца на совпадения и различия — На прочтение этой статьи у вас уйдет около 10 минут, а в следующие 5 минут (или даже быстрее) вы легко сравните два столбца Excel на наличие дубликатов и выделите найденные…
6 способов — как безопасно удалить лишние пустые строки в Excel — Это руководство научит вас нескольким простым приемам безопасного удаления нескольких пустых строк в Excel без потери информации. Пустые строки в таблице — это проблема, с которой мы все время от…
Как поменять столбцы местами в Excel? — В этой статье вы узнаете несколько методов перестановки столбцов в Excel. Вы увидите, как можно перетаскивать один или сразу несколько столбцов мышью либо с помощью «горячих» клавиш. Можно перемещать сразу несколько…
Как перенести текст в ячейке Excel на следующую строку? — В этом руководстве показано, как автоматически сделать перенос текста в одной ячейке и как вставлять разрыв строки вручную. Вы также узнаете о наиболее распространенных причинах, по которым перенос в Excel не…
Как в Excel закрепить строку и столбец при прокрутке — советы и предупреждения — При работе с большими наборами данных в Excel вам может потребоваться заблокировать определенные строки или столбцы, чтобы вы могли видеть их содержимое при прокрутке в другую область рабочего листа. Ниже…

Как убрать бесконечные столбцы в Excel?

Нажмите F5, чтобы открыть диалоговое окно Go to (Переход). В диалоговом окне нажмите кнопку Special (Выделить). В диалоговом окне Go to special (Выделить группу ячеек) отметьте пункт Blanks (Пустые ячейки) и нажмите ОК. Кликните правой кнопкой мыши по любой из выделенных ячеек и нажмите Delete (Удалить).

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

1. Выберите столбец, который вы хотите удалить. .
2. Щелкните правой кнопкой мыши выделенные столбцы.
3. В контекстном меню выберите команду Удалить , чтобы удалить выделенные столбцы, или Удалить другие столбцы , чтобы удалить все столбцы, кроме выделенных.

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

Для этого нужно после выделения всей таблицы (Ctrl + A) в разделе данных выбрать меню сортировки и фильтра. Тут применяется команда упорядочивания от минимального к максимальному (пустые строки окажутся снизу). После этого их можно удалить.

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

В разделе Cells (Ячейки) на вкладке Home (Главная) нажмите Delete (Удалить) и в выпадающем меню выберите Delete Sheet Rows (Удалить строки с листа). Все пустые строки будут удалены, а остальные окажутся смежными. Точно так же можно удалить пустые столбцы.

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

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

Как удалить много столбцов в Excel?

Чтобы удалить один столбец, выберите столбец, который вы хотите удалить, а затем выберите главная> удалить столбцы> удалить столбцы. Чтобы удалить несколько столбцов, вы можете выбрать их, нажав CTRL+щелчок или shift + щелчок.

Как убрать лишние столбцы?

1. Щелкните правой кнопкой мыши ячейку, строку или столбец, которые вы хотите удалить.
2. На мини-панели инструментов нажмите Удалить.
3. Выберите Удалить ячейки, Удалить столбцы или Удалить строки.

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

1. Выделите диапазон ячеек с повторяющимися значениями, который нужно удалить. .
2. На вкладке Данные нажмите кнопку Удалить дубликаты и в разделе Столбцы установите или снимите флажки, соответствующие столбцам, в которых нужно удалить повторения. .
3. Нажмите кнопку ОК.

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

1. Выберите используемые диапазоны и нажмите Данные > Фильтр для Фильтр функции.
2. Затем щелкните значок фильтра в столбце, по которому нужно выполнить фильтрацию, и выберите Текстовые фильтры > Комплект.

Как уменьшить количество ячеек в Excel?

Щелкните выбранные столбцы правой кнопкой мыши и выберите Спрятать из контекстного меню. Шаг 3. Выберите первую строку под общим диапазоном, нажмите Ctrl + Shift + Стрелка вниз ключи одновременно, чтобы выбрать все строки ниже общего диапазона, а затем скрыть их.

В excel убрать пустые столбцы в

Как удалить пустые столбцы? Программное удаление пустых столбцов макросом VBA

Существует несколько способов удаления пустых столбцов в Excel. Условно эти способы можно разделить на стандартные, выполняемые стандартными средствами Excel и нестандартные, выполняемые с помощью программирвоания на VBA.

Стандартные способы удаления пустых столбцов

Удаление вручную

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

Удаление при помощи сортировки

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

Удаление при помощи выделения группы ячеек

Для того чтобы удалить пустые столбцы в Excel 2007 и 2010 можно воспользоваться возможностью выделения группы ячеек. Для этого выделяем строку, содержащую пустые ячейки, после чего находим на ленте Excel вкладку «Главная», в группе «Редактирование» выбираем кнопку «Найти и выделить» и выбираем пункт «Выделение группы ячеек». В появившемся диалоговом окне «Выделение группы ячеек» включаем опцию «Пустые ячейки» и нажимаем кнопку ОК. В предварительно выделенной строке будут выделены все пустые ячейки. Остается кликнуть правой кнопкой мыши в любом месте выделенного поля и выбрать пункт «Удалить. » в контекстном меню, а в появившемся диалоговом окне «Удаление ячеек» выбрать пункт «Столбец» и нажать ОК. При этом, строго говоря, будут удалены не пустые столбцы, а столбцы, содержащие пустые ячейки в предварительно выделенной строке.

Нестандартные методы удаления пустых столбцов

Программное удаление макросом VBA

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

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

Автоматическое удаление с использованием надстройки

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

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

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

5 вариантов, как удалить пустые строки в Excel

Доброго времени суток друзья!

Эту статью я написал с целью описать 5 простых вариантов, как возможно удалить пустые строки в Excel. Частенько после импорта данных или простого копирования с другого источника мы получаем пустые строки и столбцы, что в дальнейшем может негативно сказаться и осложнить работу с информацией.

Разрывы, которые возникают в таблице благодаря возникшим пустотам, могут помешать вам эффективно ее использовать. Возникают такие проблемы:

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

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

Сортировка

Это самый простой способ убрать с вашей рабочей области или вычисляемого диапазона чистые строки. Вам нужно выделить диапазон, выбрать на вкладке «Данные» кнопку «Сортировка» и в предоставленном диалоговом окне выбираем вариант сортировки. Программа всё отсортирует по полочкам, и вы можете удалить пустые строки. Будьте внимательны! При использовании сортировки в таблице, которая имеет в своем составе несколько столбцов, вы можете нарушить целостность информации, ваши данные могут сместиться на другие ряды. Для избегания этой проблемы при выборе сортировки, нужно выделить всю таблицу и применить сортировку для всего выделенного объема.

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

Фильтрация

Этот способ также является простым и доступным абсолютно любому пользователю. Для применения фильтра на таблицу вам необходимо на вкладке «Главная» в разделе «Редактирование» нажимать кнопку «Сортировка и фильтр» и в открывшемся пункте меню выбираете «Фильтр». После включения фильтра, вам нужно выбрать столбец и в выпадающем меню указать отображение пустых ячеек. Дольше вы выделяете полученные пустые строки и просто-напросто удаляете их.

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

Я бы и этот способ причислил к достаточно простым и лёгким. Для применения этого варианта вам нужен инструмент «Выделение группы ячеек». Удалить незаполненые строки возможно в несколько этапов:

• выделение нужного диапазона;
• выбираем вкладку «Главная», в блоке «Редактирование», кликаем «Найти и выделить» и в выпадающем меню выбираете «Выделение группы ячеек»;

• в диалоговом окне, в разделе «Выделить» отмечаем пункт «пустые ячейки»;

• переходим во вкладку «Главная» и нажимаем кнопку «Ячейки» и выбираем пункт «Удалить»;
• в диалоговом окне выбираете пункт «удалить ячейки со сдвигом вверх» и все незаполненые строки будут удалены.

Формула массива

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

Итак, в чём же состоит этот способ по удалению пустых строк в Excel и как его применять:

• для большей простоты дадим имена нашим диапазонам, для этого на вкладке «Формулы» нажимаете «Диспетчер имен» и присваиваете для двух диапазонов имена, например для изначальных данных с пустыми ячейками – «Пустые», а для обработанных – «БезПустых». Обязательное условие в том, что диапазоны должны иметь одинаковый результат, но вот размещение этих диапазонов могут и отличатся, это не критично;

• следующим шагом это введение в первую ячейку второго диапазона формулу:

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

• после прописания формулы, вам нужно окончить введение формулы «гарячей» комбинацией клавишCtrl+Shift+Enter, это необходимо для того, что бы формула была введена как формула массива. Теперь используя возможность в Excel как авто заполнение (копирование формулы, протягивая за крестик в углу) вы получили исходный диапазон, но уже без пустых ячеек.

Макрос

Этот вариант также не прост, но, используя предоставленные коды, и инструкции к их применению ничего сложного и неосуществимого вы не увидите. Макрос стоит использовать, если вы уверены что такую процедуру по удалению пустых строк в Excel, а также, столбцов или ячеек будет очень частым и для выполнения этих работ стоит прописать скрипт.

Перейдите во вкладку «Сервис», выберите раздел «Макрос» и нажмите кнопку «Редактор Visual Basic» или нажав ALT+F11 и в появившемся диалоговом окне редактора нажимаем «Insert» — «Module». В открывшимся, пустом модуле ставим код:

• для удаления всех незаполненых рядов в таблице:

Удаление столбцов (Power Query)

Примечание: Надстройка Power Query предлагается в Excel 2016 в виде группы команд Скачать и преобразовать. Информация в этой статье относится и к Power Query, и к новой группе. Дополнительные сведения см. в статье Функция «Скачать и преобразовать» в Excel 2016.

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

Удаление столбцов

С помощью ленты редактора запросов

Выберите столбец, который вы хотите удалить. Чтобы выделить несколько столбцов, щелкните их, удерживая нажатой клавишу CTRL или SHIFT.

На ленте редактора запросов нажмите кнопку Удалить столбцы и выберите команду Удалить столбцы. Можно также выбрать команду Удалить другие столбцы, чтобы удалить все столбцы, кроме выделенных.

С помощью контекстного меню редактора запросов

Выберите столбец, который вы хотите удалить. Чтобы выделить несколько столбцов, щелкните их, удерживая нажатой клавишу CTRL или SHIFT.

Щелкните правой кнопкой мыши выделенные столбцы.

В контекстном меню выберите команду Удалить, чтобы удалить выделенные столбцы, или Удалить другие столбцы, чтобы удалить все столбцы, кроме выделенных.

Примечание: Редактор запросов отображается только при загрузке, редактировании или создании нового запроса с помощью Power Query. В видео показано окно редактора запросов, которое отображается после изменения запроса в книге Excel. Чтобы просмотреть редактор запросов, не загружая и не изменяя существующий запрос в книге, в разделе Получение внешних данных на вкладке ленты Power Query выберите Из других источников > Пустой запрос. В видео показан один из способов отображения редактора запросов.

Способы удаления пустых строк и столбцов в Excel

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

Выборка ячеек

Самый простой способ удалить пустые строки в Excel — это сделать выборку. Но ее не стоит делать в очень больших таблицах на несколько листов. Дело в том, что при удалении незаполненных ячеек таким способом, при ее наличии в строке с информацией, удалится вся строчка. И, таким образом, потеряется важная информация, которую пользователь не сразу заметит в большом объеме.

Делается выборка по ячейкам следующим образом:

1. Выделить курсором всю таблицу.
2. Нажать на кнопку F5.
3. Откроется диалоговое окно, в котором необходимо нажать на “Выделить”.
4. Отметить пункт “Пустые ячейки”.
5. Найти незаполненное звено в любом месте и нажать “Удалить” на клавиатуре. В появившемся окне выбрать пункт “Строку”.

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

Использование ключевого столбца

Ключевой столбец помогает определить, чистая строка или нет. Также важно сохранять порядок строчек, именно поэтому простая сортировка не поможет. Стирание происходит по следующей схеме:

1. Сначала нужно определить, какой столбец будем считать ключевым.
2. При помощи мышки выделить всю таблицу.
3. Задать к выделению фильтр, расположенный на верхней панели программы.
4. Задать параметры для столбца, где присутствует нумерация (кликнуть «Выделить все», опуститься в самый низ списка и выбрать «пустые»).
5. Выделить все ненужные строки. Теперь это намного проще, так как остались только они.
6. Стереть кликом по правой кнопке мышки и выбором пункта “Удалить строки” (тут же можно выбрать «Удалить столбцы»).
7. Очистить таблицу от фильтра, чтобы показались скрытые данные.

Этот способ хорош тем, что не устраняет строчки только из-за наличия не заполненной группы. Вся информация остается на своих местах.

Без ключевого столбца

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

1. В самом конце таблицы добавить новый чистый столбик и назвать его “Счетчик” или по-другому.
2. В первое звено вставить формулу =СЧИТАТЬПУСТОТЫ(A2:C2). В скобках устанавливаем диапазон поиска. Она посчитает количество незаполненных ячеек. В нашем случае всего 3 столбца, поэтому 3 будет считаться полностью незаполненной строкой.
3. Добавить формулу во весь новый столбик.
4. Применить фильтр к ключевому столбцу со следующими данными. Стоит отметить, что цифра 3 как раз и означает строку без информации.
5. Удалить все ненужное простым выделением, затем вспомогательный столбец и фильтр.

Использование сортировки

Сортировка помогает сместить все ненужное вниз, после чего его можно легко удалить. Для этого необходимо выделить всю таблицу и кликнуть по ней правой кнопкой мышки. Из выпадающего меню выбрать пункт “Сортировка”.

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

Использование макроса

Макрос позволяет выделить и удалить пустые строчки автоматически. Чтобы его использовать, необходимо сделать следующее:

1. Открыть разработчик комбинацией клавиш Alt+F11.
2. Создать новый модуль для используемой книги таблиц.
3. Вставить макрос:

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

Этот макрос только выделяет пустые ячейки. Но можно таким же образом массово их удалить. Для этого требуется использовать тот же макрос, но заменить сроку diapaz2.Select на diapaz2.[Delete]. После внесенных изменений все будет выделяться и удаляться автоматически.

Формула массива

Формула массива действует следующим образом:

1. Берётся два диапазона. Первый это исходная таблица, второй новый столбец, в котором после действия формулы переместятся все данные.
2. Для примера требуется дать столбцам имена следующим образом.
3. В чистый столбец в первую строчку вставить формулу:
4. Активировать ее сочетанием клавиш Ctrl+Shift+Enter.
5. Растянуть формулу по всему столбцу.
6. После чего, он автоматически заполнится данными.

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

Если в Вашей таблице Excel присутствует много пустых строк, Вы можете удалить каждую по отдельности, щелкая по ним правой кнопкой мыши и выбирая в контекстном меню команду Delete (Удалить), но для большой таблицы это займёт уйму времени! Существует более простой и быстрый способ удалить пустые столбцы или строки в Excel.

Сначала займёмся пустыми строками. Потом удалим пустые столбцы. Это делается практически точно так же.

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

Нажмите Find & Select (Найти и выделить) в разделе Editing (Редактирование) на вкладке Home (Главная) и в раскрывшемся меню выберите Go To Special (Выделить группу ячеек).

В диалоговом окне Go To Special (Выделить группу ячеек) выберите пункт Blanks (Пустые) и нажмите ОК.

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

В разделе Cells (Ячейки) на вкладке Home (Главная) нажмите Delete (Удалить) и в выпадающем меню выберите Delete Sheet Rows (Удалить строки с листа).

Все пустые строки будут удалены, а остальные окажутся смежными.

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

Повторяем те же шаги: нажмите Find & Select (Найти и выделить) в разделе Editing (Редактирование) на вкладке Home (Главная) и в раскрывшемся меню выберите Go To Special (Выделить группу ячеек).

В диалоговом окне Go To Special (Выделить группу ячеек) выберите пункт Blanks (Пустые) и нажмите ОК.

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

В разделе Cells (Ячейки) на вкладке Home (Главная) нажмите Delete (Удалить) и в выпадающем меню выберите Delete Sheet Columns (Удалить столбцы с листа).

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

Этот метод поможет быстро очистить любую таблицу Excel от пустых строк и столбцов и значительно сэкономит время.

Примечание переводчика: Хоть этот материал и является переводом зарубежной статьи, мы в любом случае обязаны предупредить Вас. Выше описан яркий пример того, как не нужно удалять пустые строки и столбцы в Excel. Используйте опцию Go To Special (Выделить группу ячеек) с большой осторожностью, особенно в таких ситуациях, как описана здесь. Если Вы не обратили внимания, то в процессе всех манипуляций проведенных автором, была удалена первая строка в таблице, а он этого даже не заметил!