Microsoft Excel

Excel und VBA: Formeln, Programmierung, Lösungen

Die Excel/VBA-Beispiele

Thema

Den ersten Wert einer gefilterten Spalte ermitteln

Gruppe

Bereich

Problem

Der erste sichtbare Wert aus einer gefilterten Spalte soll angezeigt werden. Die Spalte wird als Parameter vorgegeben.

Lösung
Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.

StandardModule: basMain

Function FilterValue(iCol As Integer)
   Dim iRow As Integer
   Application.Volatile
   iRow = 2
   Do While Rows(iRow).Hidden = True
      iRow = iRow + 1
   Loop
   FilterValue = Cells(iRow, iCol).Value
End Function