Как выделить все ячейки с данными в Excel?
Когда данные находятся в несмежных ячейках, как их выделить и скопировать? Выбор всех несмежных ячеек с данными по одной займёт много времени, особенно если данные расположены почти в случайном порядке. Следующий хитрый способ поможет вам быстро выделить все ячейки с данными в выделенном диапазоне.
Выбор всех ячеек с данными, исключая формулы, с помощью команды «Перейти к специальному»
Если среди данных нет значений, рассчитанных по формулам, команда «Перейти к специальному» поможет легко выделить все ячейки с данными в выделенном диапазоне.
Шаг 1: выделите диапазон, с которым будете работать, и нажмите клавишу F5, чтобы открыть диалоговое окно «Перейти к».
Шаг 2: нажмите кнопку «Специальное», чтобы открыть диалоговое окно «Перейти к специальному». Затем установите флажок напротив параметра «Константы» (см. снимок экрана):

Шаг 3: Нажмите кнопку «OK», после чего будут выделены все ячейки с содержимым, кроме ячеек с формулами.

Примечание: Этот способ не позволяет выделить формулу.
Выбор всех ячеек с данными, включая формулы, одним щелчком с помощью Kutools для Excel
Если вы хотите выделить ячейки, содержащие как значения, так и формулы, за минимальное количество шагов, рекомендую простой способ — Kutools для Excel. С помощью функции «Выделить непустые ячейки» вы сможете выбрать нужные ячейки всего за несколько щелчков.
После установки Kutools для Excelвыполните следующие действия: () Бесплатно скачать Kutools для Excel сейчас)
Шаг 1: Выделите диапазон, в котором требуется выбрать только ячейки с данными.
Шаг 2: Нажмите Kutools > Выделить > Выбрать непустые ячейки, и все ячейки с данными будут выделены одновременно. См. снимок экрана:

Бесплатно скачать Kutools для Excel сейчас
Выбор всех ячеек с данными, включая формулы, с помощью кода VBA
Если в вашем диапазоне есть ячейки, заполненные формулами, вы можете выделить все ячейки с данными с помощью приведённого ниже кода VBA. Выполните следующие действия:
Шаг 1: Удерживая клавиши Alt + F11, откройте окно Microsoft Visual Basic для приложений.
Шаг 2: Нажмите Вставка > Модуль и вставьте следующий макрос в окно модуля.
Код VBA: выделение всех ячеек с данными, включая формулы
Sub SelectNotBlackRange()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
Dim OutRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
If Rng.Value <> "" Then
If OutRng Is Nothing Then
Set OutRng = Rng
Else
Set OutRng = Union(OutRng, Rng)
End If
End If
Next
If Not OutRng Is Nothing Then
OutRng.Select
End If
End Sub
Шаг 3: Нажмите клавишу F5, чтобы запустить этот код. После этого появится диалоговое окно с запросом на выбор диапазона, в котором нужно выделить ячейки с данными.

Шаг 4: После выбора диапазона нажмите кнопку «OK», и все ячейки с данными, включая формулы, в указанном диапазоне будут выделены.

Связанные статьи:
Выделение несмежных ячеек или диапазонов
Инвертировать выделение Выберите диапазон
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек