Спеціальна функція «Перейти до» може допомогти нам вибрати непусті клітинки у вибраному діапазоні, виконавши наступні кроки.

1. Виберіть діапазон, з якого ви виділите всі непусті клітинки, і натисніть F5 Клавіша, щоб відкрити діалогове вікно Перейти. Потім натисніть спеціальний , щоб відкрити діалогове вікно Перейти до спеціального.

примітки: Ви також можете відкрити Перейти до спеціального діалогове вікно безпосередньо з клацанням на Головна > Знайти та вибрати > Перейти до спеціального.

2. У діалоговому вікні "Перейти до спеціального" поставте прапорець біля Константи варіант Номери варіант текст варіант Логічні варіант, і помилки та натисніть кнопку OK кнопки.

Тепер ви побачите, що в зазначеному діапазоні виділено лише не пусті клітинки із вмістом. Дивіться нижче скріншоти:

Одним клацанням миші виділіть усі непусті клітинки в діапазоні в Excel

Kutools for ExcelАвтора Виберіть Nonblank Cells Утиліта може допомогти вам швидко вибрати всі непусті клітинки з вибраного діапазону лише одним клацанням миші.

Тут ми пропонуємо макрос 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 for ExcelАвтора Виберіть Nonblank Cells Утиліта дозволяє лише одним клацанням миші вибрати всі непусті клітинки певного діапазону.

Виберіть діапазон, для якого ви виберете лише порожні клітинки, і клацніть на Кутулс > Select > Виберіть Nonblank Cells.

Тепер усі непусті клітинки в зазначеному діапазоні виділяються одночасно.