Hallo zusammen,

ich habe ein Problem.

Vereinfacht lautet dieses: Ich habe 5 Kommazahlen A1 bis A5 (1,1 / 1,2 / 1,3 / 1,4 und 1,5) untereinander stehen und in A3 mein Kriterium (ebenfalls eine Kommazahl 1,2). Ich würde gerne mit der CountIf Funktion alle Zahlen größergleich das Kriterium zählen und in B3 ausgeben. Nun gibt mir die Funktion immer nur 0 aus und ich weiß einfach nicht wieso. Wenn ich ">=1.2" in das Argument schreibe dann funktioniert das ganze. Ich brauche aber die Variable in der CountIf Funktion. Hat irgendjemand eine Idee an was das liegt? Danke schon mal.

Sub Count()
Dim criteria As Double

criteria = Cells(1, 3)
Cells(2, 3) = WorksheetFunction.CountIf(Range(Cells(1, 1), Cells(5, 1)), ">=" & criteria)


End Sub