Как найти и получить значение первой видимой ячейки после фильтрации в Excel?

В некоторых случаях вам может понадобиться получить значение первой видимой ячейки в отфильтрованном списке. Как это сделать? В этой статье мы покажем вам методы решения этой задачи.

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

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

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

1. Выберите пустую ячейку для размещения первого видимого значения, введите в неё приведённую ниже формулу, а затем одновременно нажмите клавиши Ctrl + Shift + Enter.

=ИНДЕКС(C2:C19;МИН(ЕСЛИ(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(3;СМЕЩ(C2;СТРОКА(C2:C19)-СТРОКА(C2);0));СТРОКА(C2:C19)-СТРОКА(C2)+1)))

Примечание: В формуле C2:C19 — это отфильтрованный список, из которого вы хотите вернуть значение первой видимой ячейки, C2 — первая ячейка списка. Вы можете изменить их по своему усмотрению.

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

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

Помимо использования формулы массива, описанной выше, для получения значения первой видимой ячейки в отфильтрованном списке, вы можете запустить приведённый ниже сценарий VBA, чтобы быстро вернуть первую видимую ячейку отфильтрованного списка. Пожалуйста, выполните следующие действия.

1. Выберите пустую ячейку, например E8, для размещения значения первой видимой ячейки отфильтрованного списка.

2. Одновременно нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

3. В окне Microsoft Visual Basic for Applications нажмите Вставить > Модуль. Затем скопируйте и вставьте приведённый ниже код VBA в окно Модуль.

Код VBA: найти и получить значение первой видимой ячейки после фильтрации в Excel

Sub FirstVisibleCell()
   With Worksheets("Sheet1").AutoFilter.Range
       ActiveCell.Value2 = Range("C" & .Offset(1, 0).SpecialCells(xlCellTypeVisible)(1).Row).Value2
    End With
End Sub

Примечание: В коде Sheet1 — это имя листа, содержащего отфильтрованный список. «C» — это имя столбца, из которого вы хотите получить первое видимое значение. Вы можете изменить их по своему усмотрению.

4. Нажмите клавишу F5, чтобы запустить код, и тогда первая видимая ячейка отфильтрованного списка, расположенная в столбце C, будет немедленно помещена в ячейку E8.