Совет. Другие языки - Google-Translated. Вы можете посетить English версия этой ссылки.
Войти
x
or
x
x
Регистрация
x

or

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

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

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

Выберите непустые ячейки в диапазоне с VBA

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

One click to select all nonblank cells in a range in Excel

Kutools для Excel Выберите непустые ячейки утилита может помочь вам быстро выбрать все непустые ячейки из выбранного диапазона одним щелчком мыши. Полнофункциональная бесплатная пробная версия 60-day!

рекламные выберите непустые ячейки

Вкладка «Office» Включите редактирование и просмотр с вкладками в Office и упростите свою работу ...
Kutools для Excel добавляет расширенные функции 300 в Excel и повышает производительность на 80%
  • Super Formula Bar (легко редактировать несколько строк текста и формул); Чтение макета (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон ...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объединить дублирующиеся строки и сумму / среднее ... Предотвратить повторяющиеся клетки; Сравнить диапазоны ...
  • Выберите Дублировать или Уникальные строки; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих книгах; Случайный выбор ...
  • Точное копирование нескольких ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставьте маркеры, флажки и многое другое ...
  • Любить и быстро вставлять формулы, диапазоны, графики и рисунки; Шифровать ячейки с помощью пароля; Создать список рассылки и отправлять электронные письма ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев ...
  • Суперфильтр (сохранение и применение схем фильтрации к другим листам); Расширенный Сортировать по месяцу / неделе / ​​дню, частоте и многому другому; Специальный фильтр жирным шрифтом, курсив ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разбить данные на несколько листов; Пакетное конвертирование xls, xlsx и PDF ...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.

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

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

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

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

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


Здесь мы предоставляем макрос 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 или нажмите прогон для запуска этого VBA.

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

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


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

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

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

Kutools for Excel - Включает в себя более удобных инструментов 300 для Excel. Полнофункциональная бесплатная пробная версия 60-day, кредитная карта не требуется! Get It Now


В этом видео, Kutools Kutools Plus вкладки добавляются Kutools for Excel, Если это необходимо, пожалуйста, нажмите для 60-дневная бесплатная пробная версия без ограничений!

  • Супер Формула Бар (легко редактировать несколько строк текста и формул); Макет чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы и хранение данных; Содержание сплит-клеток; Объедините дублирующиеся строки и сумму / среднее... предотвратить повторяющиеся клетки; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выберите пустые строки (все ячейки пусты); Супер найти и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения формулы ссылки; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Любимые и быстро вставляемые формулы, Диапазоны, графики и рисунки; Шифрование ячеек с паролем; Создать список рассылки и отправлять электронные письма ...
  • Извлечение текстаДобавить текст, Удалить по позиции, Удалить пространство; Создание и печать промежуточных итогов подкачки; Преобразование содержимого ячеек и комментариев...
  • Суперфильтр (сохранить и применить схемы фильтров к другим листам); Расширенный поиск по месяцам / неделям / дням, частоте и более; Специальный фильтр жирным шрифтом, курсивом ...
  • Объединить рабочие тетради и рабочие листы; Объединение таблиц на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Работает с Office 2007-2019 и 365 и поддерживает все языки. Это легко развернуть в вашей компании. Полнофункциональная 60-дневная бесплатная пробная версия.
вкладка kte 201905
  • Включить редактирование и чтение с вкладками в Word, Excel, PowerPoint, Издатель, Доступ, Visio и Проект.
  • Открывайте и создавайте несколько документов в новых вкладках одного и того же окна, а не в новых окнах.
  • Увеличивает вашу производительность на 50% и уменьшает сотни щелчков мышью для вас каждый день!
нижняя часть офиса
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    dash · 1 years ago
    Hi,
    Would you please show how this code can be modified so the range would be part of the code and wont need user input? like column B:B of a sheet named "List"?