Як виділити непусті клітинки в діапазоні в Excel?
Скажімо, у діапазоні існує безліч сусідніх порожніх комірок, і зараз вам потрібно виділити всі комірки із вмістом. Як легко вибрати всі непорожні клітинки в Excel? Є кілька хитрощів для її вирішення.
- Виділіть непусті клітинки в діапазоні із спеціальною функцією Перейти
- Виділіть непусті клітинки в діапазоні з VBA
- Виділіть непусті клітинки в діапазоні за допомогою Kutools для Excel (лише один крок)
Виділіть непусті клітинки в діапазоні із спеціальною функцією Перейти
Спеціальна функція «Перейти до» може допомогти нам вибрати непусті клітинки у вибраному діапазоні, виконавши наступні кроки.
1. Виберіть діапазон, з якого ви виділите всі непусті клітинки, і натисніть F5 Клавіша, щоб відкрити діалогове вікно Перейти. Потім натисніть спеціальний , щоб відкрити діалогове вікно Перейти до спеціального.
примітки: Ви також можете відкрити Перейти до спеціального діалогове вікно безпосередньо з клацанням на Головна > Знайти та вибрати > Перейти до спеціального.
2. У діалоговому вікні "Перейти до спеціального" поставте прапорець біля Константи варіант Номери варіант текст варіант Логічні варіант, і помилки та натисніть кнопку OK кнопки.
Тепер ви побачите, що в зазначеному діапазоні виділено лише не пусті клітинки із вмістом. Дивіться нижче скріншоти:
Одним клацанням миші виділіть усі непусті клітинки в діапазоні в Excel
Kutools для Excel Виберіть Nonblank Cells Утиліта може допомогти вам швидко вибрати всі непусті клітинки з вибраного діапазону лише одним клацанням миші.

Виділіть непусті клітинки в діапазоні з VBA
Тут ми пропонуємо макрос VBA для виділення всіх непустих комірок із заданого діапазону. Будь ласка, виконайте наступне:
1, натисніть інший + F11 клавіші, щоб відкрити вікно Microsoft Visual Basic for Applications.
2. Натисніть Insert > Модулі, а потім вставте наступний код VBA у вікно модуля, що відкривається.
VBA: Виберіть непусті клітинки з діапазону
Sub SelectNonBlankCells()
Dim Rng As Range
Dim OutRng As Range
Dim InputRng As Range
Dim xTitle As String
On Error Resume Next
xTitle = Application.ActiveWindow.RangeSelection.Address
Set InputRng = Application.InputBox("Range :", "KutoolsforExcel", xTitle, Type:=8)
Set InputRng = Application.Intersect(InputRng, Application.ActiveSheet.UsedRange)
For Each Rng In InputRng
If Not Rng.Value = "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Application.Union(OutRng, Rng)
End If
End If
Next
If Not (OutRng Is Nothing) Then
OutRng.Select
End If
End Sub
3, натисніть F5 або клацніть на прогін для запуску цього VBA.
4. У діалоговому вікні, що відкриється, будь-ласка, вкажіть діапазон, для якого ви будете обирати лише порожні клітинки, та натисніть OK кнопки.
Тепер усі непусті клітинки негайно виділяються у вказаному діапазоні.
Виділіть непусті клітинки в діапазоні за допомогою Kutools для Excel
Kutools для Excel Виберіть Nonblank Cells Утиліта дозволяє лише одним клацанням миші вибрати всі непусті клітинки певного діапазону.
Kutools для Excel - Включає понад 300 зручних інструментів для Excel. Повна безкоштовна пробна версія 30-день, кредитна картка не потрібна! Безкоштовна пробна версія зараз!
Виберіть діапазон, для якого ви виберете лише порожні клітинки, і клацніть на Кутулс > вибрати > Виберіть Nonblank Cells.
Тепер усі непусті клітинки в зазначеному діапазоні виділяються одночасно.
Kutools для Excel - Включає понад 300 зручних інструментів для Excel. Повна безкоштовна пробна версія 30-день, кредитна картка не потрібна! Get It Now
Демонстрація: виділіть непусті клітинки в діапазоні в Excel
Найкращі інструменти для підвищення продуктивності офісу
Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%
- Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
- Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
- Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
- Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
- Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
- Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
- Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
- Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
- Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
