Перейти к основному содержанию

Как выбрать непустые ячейки в диапазоне в Excel?

Допустим, в диапазоне существует много несмежных пустых ячеек, и теперь вам нужно выбрать все ячейки с текущим содержимым. Как легко выбрать все непустые ячейки в Excel? Есть несколько уловок, чтобы решить эту проблему.


Выберите непустые ячейки в диапазоне с помощью специальной функции Перейти

Функция Go To Special может помочь нам выбрать непустые ячейки в выбранном диапазоне с помощью следующих шагов.

1. Выберите диапазон, из которого вы выберете все непустые ячейки, и нажмите F5 Клавиша открытия диалогового окна "Перейти". Затем нажмите кнопку Особый кнопку, чтобы открыть диалоговое окно Перейти к специальному.

Внимание: Вы также можете открыть Перейти к специальному диалоговое окно, щелкнув Главная > Найти и выбрать > Перейти к специальному.

2. В диалоговом окне "Перейти к специальному" установите флажок Константы вариант, Номера вариант, Текст вариант, Логика вариант, и ошибки и нажмите OK .

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

Один щелчок, чтобы выбрать все непустые ячейки в диапазоне в Excel

Kutools для Excel Выбрать непустые ячейки Утилита может помочь вам быстро выбрать все непустые ячейки из выбранного диапазона одним щелчком мыши.


ad выберите непустые ячейки

Выберите непустые ячейки в диапазоне с помощью 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 для Excel Выбрать непустые ячейки Утилита позволяет выбрать все непустые ячейки из определенного диапазона одним щелчком мыши.

Kutools for Excel - Содержит более 300 основных инструментов для Excel. Наслаждайтесь полнофункциональной 30-дневной БЕСПЛАТНОЙ пробной версией без необходимости использования кредитной карты! Скачать сейчас!

Выберите диапазон, в котором вы выберете только непустые ячейки, и нажмите кнопку Кутулс > Выберите > Выбрать непустые ячейки.

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

Kutools for Excel - Дополните Excel более чем 300 основными инструментами. Наслаждайтесь полнофункциональной 30-дневной БЕСПЛАТНОЙ пробной версией без необходимости использования кредитной карты! Get It Now


Демонстрация: выделение непустых ячеек в диапазоне в Excel


Kutools for Excel: Более 300 удобных инструментов у вас под рукой! Начните 30-дневную бесплатную пробную версию без ограничений сегодня. Скачать

Лучшие инструменты для офисной работы

🤖 Kutools AI Помощник: Революционный анализ данных на основе: Интеллектуальное исполнение   |  Генерировать код  |  Создание пользовательских формул  |  Анализ данных и создание диаграмм  |  Вызов функций Kutools...
Популярные опции: Найдите, выделите или определите дубликаты   |  Удалить пустые строки   |  Объедините столбцы или ячейки без потери данных   |   Раунд без формулы ...
Супер поиск: Множественный критерий VLookup    VLookup с несколькими значениями  |   VLookup по нескольким листам   |   Нечеткий поиск ....
Расширенный раскрывающийся список: Быстрое создание раскрывающегося списка   |  Зависимый раскрывающийся список   |  Выпадающий список с множественным выбором ....
Менеджер столбцов: Добавить определенное количество столбцов  |  Переместить столбцы  |  Переключить статус видимости скрытых столбцов  |  Сравнить диапазоны и столбцы ...
Рекомендуемые функции: Сетка Фокус   |  Просмотр дизайна   |   Большой Формулный Бар    Менеджер книг и листов   |  Библиотека ресурсов (Авто текст)   |  Выбор даты   |  Комбинировать листы   |  Шифровать/дешифровать ячейки    Отправлять электронные письма по списку   |  Суперфильтр   |   Специальный фильтр (фильтровать жирным шрифтом/курсивом/зачеркиванием...) ...
15 лучших наборов инструментов12 Текст Инструменты (Добавить текст, Удалить символы, ...)   |   50+ График Тип (Диаграмма Ганта, ...)   |   40+ Практических Формулы (Рассчитать возраст по дню рождения, ...)   |   19 Вносимые Инструменты (Вставить QR-код, Вставить изображение из пути, ...)   |   12 Конверсия Инструменты (Числа в слова, Конверсия валюты, ...)   |   7 Слияние и разделение Инструменты (Расширенные ряды комбинирования, Разделить клетки, ...)   |   ... и более

Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени.  Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...

Описание


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations