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

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

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

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

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

Этот способ (F5 > Специальный… > Бланки) находит и выбирает все пустые ячейки в диапазоне:
Go To Special - Blanks находит и выделяет все пустые ячейки в диапазоне.

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

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

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

Опытные пользователи Excel знают это эмпирическое правило: чтобы не тратить часы на выполнение чего-либо вручную, потратьте несколько минут на написание макроса, который сделает это за вас автоматически.

Приведенный ниже макрос VBA удаляет все пустые столбцы в выбранном диапазоне. И делает это безопасно — удаляются только абсолютно пустые столбцы. Если столбец содержит значение одной ячейки, даже пустую строку, возвращаемую какой-либо формулой, такой столбец останется нетронутым.

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

Public Sub DeleteEmptyColumns() Dim SourceRange As Range Dim EntireColumn As Range On Error Resume Next Set SourceRange = Application.InputBox( _ “Выберите диапазон:”, “Удалить пустые столбцы”, _ Application.Selection.Address, Type:=8) Если нет (SourceRange не имеет значения), то Application.ScreenUpdating = False For i = SourceRange.Columns.Count равно 1 Шаг -1 Установите EntireColumn = SourceRange.Cells(1, i).EntireColumn If Application.WorksheetFunction.CountA(EntireColumn) = 0 Затем EntireColumn.Delete End If Next Application.ScreenUpdating = True End If End Sub

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

Вот шаги, чтобы добавить макрос в ваш Excel:

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

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

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

  1. Загрузите наш образец рабочей тетради, чтобы Удалить пустые столбцы в Excelоткройте его и включите содержимое, если будет предложено.
  2. Откройте свою книгу или переключитесь на уже открытую.
  3. В книге нажмите Alt + F8, выберите Удалитьпустые столбцы макрос и нажмите Бежать.
  4. Во всплывающем диалоговом окне выберите диапазон и нажмите ХОРОШО.

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

В любом случае все пустые столбцы в выбранном диапазоне будут удалены:
Все пустые столбцы в выбранном диапазоне будут удалены.

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

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

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

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

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

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

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

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

=СЧЕТЧАСТЬ(A2:A1048576)=0

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

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

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

= ЕСЛИ (СЧЕТЧИК (A2: A1048576) = 0, «Пусто», «Не пусто»)

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

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

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

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

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

  1. Выберите верхнюю строку с формулами, перейдите к Данные вкладка > Сортировка и фильтрация группу и нажмите кнопку Сортировать.
  2. В появившемся диалоговом окне с предупреждением выберите Расширить выбор и нажмите Сортировать…
    Расширьте выбор и отсортируйте.
  3. Это откроет Сортировать диалоговое окно, в котором вы нажимаете кнопку Опции… выберите Сортировать слева направо и щелкните ХОРОШО.
    Сортировка столбцов слева направо.
  4. Настройте только один уровень сортировки, как показано ниже, и нажмите OK:
    • Сортировать по: строке 1
    • Сортировать по: значениям ячеек
    • Порядок: от А до Я

    Сортировка столбцов по значениям строки 1.

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

  5. Выберите все пустые столбцы — щелкните букву первого столбца, нажмите клавишу Shift, а затем щелкните букву последнего пустого столбца.
  6. Щелкните правой кнопкой мыши выбранные столбцы и выберите «Удалить» во всплывающем меню.
    Удалить пустые столбцы в Excel.

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

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

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

На целевом листе переключитесь на инструменты вкладка, нажмите Удалить пробелы и выберите Пустые столбцы:
Удаление пустых столбцов в Excel одним нажатием кнопки

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

Нажмите ХОРОШОи через мгновение все пустые столбцы исчезнут!

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

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

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

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

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

Чтобы определить виновника, выберите первую ячейку в проблемном столбце и нажмите Ctrl + стрелка вниз. Например, столбец C на снимке экрана ниже не пуст из-за одного пробела в C6:
Узнайте, почему конкретный столбец не пуст.

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

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

Вас также могут заинтересовать

Похожие записи

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *