Как выбрать непустые ячейки в диапазоне в Excel?
Допустим, в диапазоне существует много несмежных пустых ячеек, и теперь вам нужно выбрать все ячейки с текущим содержимым. Как легко выбрать все непустые ячейки в Excel? Есть несколько уловок, чтобы решить эту проблему.
- Выберите непустые ячейки в диапазоне с помощью специальной функции Перейти
- Выберите непустые ячейки в диапазоне с помощью VBA
- Выберите непустые ячейки в диапазоне с помощью Kutools for Excel (только один шаг)
Выберите непустые ячейки в диапазоне с помощью специальной функции Перейти
Функция Go To Special может помочь нам выбрать непустые ячейки в выбранном диапазоне с помощью следующих шагов.
1. Выберите диапазон, из которого вы выберете все непустые ячейки, и нажмите F5 Клавиша открытия диалогового окна "Перейти". Затем нажмите кнопку Особый кнопку, чтобы открыть диалоговое окно Перейти к специальному.
Внимание: Вы также можете открыть Перейти к специальному диалоговое окно, щелкнув Главная > Найти и выбрать > Перейти к специальному.
2. В диалоговом окне "Перейти к специальному" установите флажок Константы вариант, Номера вариант, Текст вариант, Логика вариант, и ошибки и нажмите OK кнопку.
Теперь вы увидите, что только непустые ячейки с содержимым выбраны в указанном диапазоне. См. Скриншоты ниже:
Один щелчок, чтобы выбрать все непустые ячейки в диапазоне в Excel
Kutools for ExcelАвтора Выбрать непустые ячейки Утилита может помочь вам быстро выбрать все непустые ячейки из выбранного диапазона одним щелчком мыши.

Выберите непустые ячейки в диапазоне с помощью VBA
Здесь мы предоставляем макрос VBA для выбора всех непустых ячеек из указанного диапазона. Пожалуйста, сделайте следующее:
1, нажмите другой + F11 клавиши, чтобы открыть окно Microsoft Visual Basic для приложений.
2, Нажмите Вставить > Модули, а затем вставьте следующий код 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 ключ или щелкните Run кнопку для запуска этого VBA.
4. В открывшемся диалоговом окне укажите диапазон, в котором вы будете выбирать только непустые ячейки, и нажмите кнопку OK кнопку.
Теперь все непустые ячейки выбираются сразу в указанном диапазоне.
Выберите непустые ячейки в диапазоне с помощью Kutools for Excel
Kutools for ExcelАвтора Выбрать непустые ячейки Утилита позволяет выбрать все непустые ячейки из определенного диапазона одним щелчком мыши.
Kutools for Excel - Содержит более 300 основных инструментов для Excel. Наслаждайтесь полнофункциональным 30-дневная БЕСПЛАТНАЯ пробная версия без необходимости использования кредитной карты! Скачать сейчас!
Выберите диапазон, в котором вы выберете только непустые ячейки, и нажмите кнопку Кутулс > Выберите > Выбрать непустые ячейки.
Теперь все непустые ячейки в указанном диапазоне выбираются сразу.
Kutools for Excel - Дополните Excel более чем 300 основными инструментами. Наслаждайтесь полнофункциональным 30-дневная БЕСПЛАТНАЯ пробная версия без необходимости использования кредитной карты! Get It Now
Демонстрация: выделение непустых ячеек в диапазоне в Excel
Лучшие инструменты для офисной работы
Усовершенствуйте свои навыки работы с Excel с помощью Kutools for Excelи испытайте эффективность, как никогда раньше. Kutools for Excel Предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Office Tab Добавляет в Office интерфейс с вкладками и значительно упрощает вашу работу
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
