Зміст
Урок навчить вас видаляти порожні стовпці в Excel за допомогою макросу, формули і натискання кнопки.
Як би банально це не звучало, але видалення порожніх стовпців в Excel - це не те, чого можна досягти простим клацанням миші. Це також не можна зробити в два кліки. Перспектива перегляду всіх стовпців на робочому аркуші та видалення порожніх вручну - це, безумовно, те, чого ви хотіли б уникнути. На щастя, Microsoft Excel надає безліч різноманітних функцій, і, використовуючи ці функції, ви можетеможливостей творчо підійти до вирішення практично будь-якої задачі!
Швидкий спосіб видалення порожніх стовпців, який ніколи не варто використовувати
Коли справа доходить до видалення пропусків в Excel (будь то порожні клітинки, рядки або стовпці), багато інтернет-ресурсів покладаються на Перейдіть до розділу "Особливе > Заготовки командування. Ніколи не робіть цього у ваших робочих зошитах!
Цей метод ( F5 > Особливий... > Заготовки ) знаходить та відбирає всі порожні клітинки в діапазоні:
Якщо тепер клацнути правою кнопкою миші по виділеним коміркам і вибрати Видалити > Вся колонка всі стовпчики, які містять принаймні одна порожня клітинка Якщо ви ненавмисно це зробили, натисніть 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) If Not (SourceRange Is Nothing ) Then Application.ScreenUpdating = False For i = SourceRange.Columns.Count To 1Крок -1 Set EntireColumn = SourceRange.Cells(1, i).EntireColumn If Application.WorksheetFunction.CountA(EntireColumn) = 0 Then EntireColumn.Delete End If Next Application.ScreenUpdating = True End If End SubЯк використовувати макрос "Видалення порожніх стовпців
Нижче наведені кроки для додавання макросу в Excel:
- Натисніть Alt + F11, щоб відкрити редактор Visual Basic.
- У рядку меню натисніть Вставка > Модуль .
- Вставте наведений вище код у вікно Code.
- Натисніть F5, щоб запустити макрос.
- Коли з'явиться спливаюче діалогове вікно, перейдіть на аркуш, що вас цікавить, виберіть потрібний діапазон і натисніть кнопку ОК:
Якщо ви не хочете додавати макрос на свій аркуш, ви можете запустити його з нашого зразка книги. Ось як це зробити:
- Завантажте наш зразок книги Видалення порожніх стовпців в Excel, відкрийте її та ввімкніть вміст, якщо з'явиться відповідний запит.
- Відкрийте власну книгу або перейдіть до вже відкритої.
- У робочій книзі натисніть Alt + F8, виберіть пункт DeleteEmptyColumns (Видалити порожні стовпці) макрос і натисніть Біжи .
- У діалоговому вікні, що з'явилося, виберіть діапазон і натисніть ГАРАЗД. .
У будь-якому випадку, всі порожні стовпці у вибраному діапазоні будуть видалені:
Визначення та видалення порожніх стовпців в Excel за допомогою формули
Наведений вище макрос видаляє порожні стовпці швидко і безшумно. Але якщо ви людина, яка "тримає все під контролем" (як я :), ви можете захотіти візуально побачити стовпці, які будуть видалені. У цьому прикладі ми спочатку визначимо порожні стовпці за допомогою формули, щоб ви могли швидко їх переглянути, а потім видалимо всі або деякі з них.
Примітка. Перед тим, як видаляти що-небудь безповоротно, особливо за допомогою невідомої методики, я настійно рекомендую вам зробити резервна копія вашої робочої книжки, щоб перестрахуватися на випадок, якщо щось піде не так.
Маючи резервну копію в безпечному місці, виконайте наступні дії:
Крок 1: Вставити новий рядок
Додайте новий рядок у верхній частині таблиці. Для цього клацніть правою кнопкою миші по заголовку першого рядка і виберіть Вставка Не хвилюйтеся, що ви зіпсуєте структуру/впорядкування своїх даних - ви можете видалити цей рядок пізніше.
Крок 2. Визначте порожні стовпчики
У крайню ліву комірку доданого рядка введіть наступну формулу:
=COUNTA(A2:A1048576)=0
Потім скопіюйте формулу в інші стовпці, перетягнувши маркер заповнення.
Логіка формули дуже проста: COUNTA перевіряє кількість порожніх клітинок у стовпці, починаючи з рядка 2 і закінчуючи рядком 1048576, що є максимумом рядка в Excel 2019 - 2007. Ви порівнюєте це число з нулем і в результаті отримуєте значення ІСТИНА в порожніх стовпцях і значення БРЕХНЯ в стовпцях, що містять хоча б одну непорожню комірку. Завдяки використанню відносних посилань на клітинки формула правильно підлаштовується під кожен стовпецьде вона копіюється.
Якщо ви налаштовуєте робочий аркуш для когось іншого, ви можете захотіти позначити стовпці більш змістовно. Немає проблем, це можна легко зробити за допомогою оператора IF, подібного до цього:
=IF(COUNTA(A2:A1048576)=0, "Пусто", "Не пусто")
Тепер у формулі чітко вказано, які стовпці є порожніми, а які ні:
Порада. У порівнянні з макросом, цей спосіб дає більшу гнучкість щодо того, які стовпці вважати порожніми. У цьому прикладі ми перевіряємо всю таблицю, включаючи рядок заголовка. Тобто, якщо стовпець містить тільки заголовок, то такий стовпець не вважається порожнім і не видаляється. Якщо ви хочете перевірити тільки рядки даних ігнорування заголовків стовпців видаліть рядок (рядки) заголовка з цільового діапазону (A3:A1048576). В результаті стовпець, який має заголовок і не містить інших даних, буде вважатися порожнім і підлягає видаленню. Також можна обмежити діапазон до останнього використаного рядка, що в нашому випадку буде A11.
Крок 3. Видаляємо порожні колонки
Маючи достатню кількість колонок, можна просто виділити ті, у яких в першому рядку стоїть "Пусто" (для виділення декількох колонок утримуйте клавішу Ctrl при натисканні на літери колонок). Потім клацніть правою кнопкою миші по будь-якій виділеній колонці, і виберіть пункт Видалити з контекстного меню:
Якщо у вашому аркуші десятки або сотні стовпців, має сенс вивести на екран всі порожні стовпці. Для цього зробіть наступне:
- Виділіть верхній рядок з формулами, перейдіть на вкладку Дані вкладка> Сортування та фільтрація і натисніть кнопку Сортування кнопку.
- У діалоговому вікні з попередженням, що з'явилося, виберіть Розширити вибір і натисніть Сорт...
- Це дозволить відкрити Сортування діалогове вікно, в якому потрібно натиснути кнопку Варіанти... кнопку, виберіть Сортування зліва направо, і натисніть ГАРАЗД. .
- Налаштуйте лише один рівень сортування, як показано нижче, і натисніть OK:
- Сортувати за: Рядок 1
- Сортування за: Значеннями комірок
- Замовлення: від А до Я
В результаті порожні стовпці будуть переміщені в ліву частину робочого аркуша:
- Виділіть всі порожні стовпчики - клацніть по букві першого стовпчика, натисніть Shift, а потім клацніть по букві останнього порожнього стовпчика.
- Клацніть правою кнопкою миші по вибраних стовпцях і виберіть Видалити у спливаючому меню.
Готово! Ви позбулися порожніх стовпчиків, і ніщо не заважає тепер видалити верхній рядок з формулами.
Найшвидший спосіб видалити порожні стовпці в Excel
На початку цього уроку я писав, що не існує способу видалення порожніх стовпців в Excel в один клік. Насправді, це не зовсім так. Я повинен був сказати, що не існує вбудованого способу. Користувачі нашого Ultimate Suite можуть видаляти порожні стовпці в Excel буквально в пару кліків :)
На цільовому робочому аркуші перейдіть на вкладку Ablebits Tools вкладка, натисніть Видалення пропусків та обирайте Порожні колонки :
Щоб переконатися, що це не було випадкове клацання мишею, надбудова попросить вас підтвердити, що ви дійсно хочете видалити порожні стовпці з цього аркуша:
Натисніть ГАРАЗД. і за мить всі порожні стовпчики зникли!
Як і макрос, розглянутий вище, цей інструмент видаляє тільки ті стовпці, які абсолютно порожній Стовпці, які мають будь-яке єдине значення, включаючи заголовки, зберігаються.
Видалення пропусків це лише одна з десятків чудових функцій, які можуть полегшити ваше життя як користувача Excel. Щоб дізнатися більше, ви можете завантажити пробну версію нашого Ultimate Suite for Excel.
Пусті графи не видаляються! Чому?
Випуск : Ви спробували всі перераховані вище способи, але один або кілька порожніх стовпців застрягли у вашому робочому листі. Чому?
Швидше за все, тому, що ці стовпці насправді не порожні. У ваших таблицях Excel, особливо якщо ви імпортували інформацію із зовнішнього джерела, може ховатися безліч різних невидимих для людського ока символів, особливо якщо ви імпортували інформацію із зовнішнього джерела. Це може бути просто порожній рядок або пробіл, нерозривний пробіл або будь-який інший недрукований символ.
Щоб знайти винуватця, виділіть першу комірку в проблемному стовпчику і натисніть Ctrl + стрілку вниз. Наприклад, стовпчик С на скріншоті нижче не порожній через один пробіл в С6:
Двічі клацніть по комірці, щоб побачити, що насправді в ній знаходиться, або просто натисніть клавішу Delete, щоб позбутися невідомого. А потім повторіть вищеописаний процес, щоб з'ясувати, чи є ще якісь невидимі речі в цьому стовпчику. Ви також можете почистити дані, видаливши початкові, кінцеві та нерозривні пробіли.
Дякую за увагу і сподіваюсь побачити Вас на нашому блозі наступного тижня!
