ich möchte nur die per Autofilter erste gefilterte Zelle auslesen. Die Spalte ist bekannt, die Zeile wird gesucht. Hat jemand nen Hinweis?
Danke und Gruss,
Torsten
Sub ersteAusgefilterteZeileAuswerten()
Dim a As Areas, Spalte%
Debug.Print
Spalte = 3
Set a = [a1].CurrentRegion.SpecialCells(xlCellTypeVisible).Areas()
If a(1).Rows.Count = 1 Then
Debug.Print a(2).Cells(1, Spalte).Value
Else
Debug.Print a(1).Cells(2, Spalte).Value
End If
Debug.Print c
End Sub