Hoe vind en verkrijg je de waarde van de eerste zichtbare cel na filteren in Excel?

In sommige gevallen moet je mogelijk de waarde van de eerste zichtbare cel in een gefilterde lijst verkrijgen. Hoe kun je dit bereiken? Dit artikel laat je methoden zien om het probleem op te lossen.

Zoek en verkrijg de waarde van de eerste zichtbare cel na filteren met een matrixformule
Zoek en verkrijg de waarde van de eerste zichtbare cel na filteren met VBA

Zoek en verkrijg de waarde van de eerste zichtbare cel na filteren met een matrixformule

Je kunt de volgende matrixformule gebruiken om de waarde van de eerste zichtbare cel in een gefilterde lijst te verkrijgen. Doe het volgende.

1. Selecteer een lege cel om de eerste zichtbare waarde in te plaatsen, voer de onderstaande formule erin in, en druk vervolgens gelijktijdig op de toetsen Ctrl + Shift + Enter.

=INDEX(C2:C19;MIN(ALS(SUBTOTAAL(3;VERSCHUIVING(C2;RIJ(C2:C19)-RIJ(C2);0));RIJ(C2:C19)-RIJ(C2)+1)))

Opmerking: In de formule is C2:C19 de gefilterde lijst waarvan je de waarde van de eerste zichtbare cel wilt retourneren, C2 is de eerste cel van de lijst. Je kunt ze naar behoefte wijzigen.

Vervolgens zie je de waarde van de eerste zichtbare cel in de gefilterde lijst verschijnen in de geselecteerde cel, zoals in de bovenstaande schermafbeelding te zien is.

Zoek en verkrijg de waarde van de eerste zichtbare cel na filteren met VBA

Naast het gebruik van de bovenstaande matrixformule om de waarde van de eerste zichtbare cel in een gefilterde lijst te verkrijgen, kun je het onderstaande VBA-script uitvoeren om snel de eerste zichtbare cel van een gefilterde lijst te retourneren. Doe het volgende.

1. Selecteer een lege cel, zoals E8, om de waarde van de eerste zichtbare cel van een gefilterde lijst in te plaatsen.

2. Druk gelijktijdig op de toetsen Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.

3. Klik in het Microsoft Visual Basic for Applications-venster op Invoegen > Module. Kopieer en plak vervolgens de onderstaande VBA-code in het Module-venster.

VBA-code: zoek en verkrijg de waarde van de eerste zichtbare cel na filteren in Excel

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

Opmerking: In de code is Sheet1 de naam van het werkblad dat de gefilterde lijst bevat. “C” is de kolomnaam waaruit je de eerste zichtbare waarde wilt verkrijgen. Je kunt ze naar behoefte wijzigen.

4. Druk op de toets F5 om de code uit te voeren, dan wordt de eerste zichtbare cel van de gefilterde lijst die zich in kolom C bevindt onmiddellijk ingevuld in cel E8.