Note: The other languages of the website are Google-translated. Back to English

Як виділити непусті клітинки в діапазоні в Excel?

Скажімо, у діапазоні існує безліч сусідніх порожніх комірок, і зараз вам потрібно виділити всі комірки із вмістом. Як легко вибрати всі непорожні клітинки в 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 включає більше 300 зручних інструментів для Excel, які можна спробувати без обмежень протягом 30 днів. Завантажте та безкоштовно пробну версію зараз!

Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (0)
Поки немає оцінок. Оцініть першим!
There are no comments posted here yet
Залишайте свої коментарі
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL