WorksheetFunction.CountIf ..

mit dem kleinen Makro ..

Sub Deals()

Dim LD As Range

Set LD = Worksheets("Deals").Range("I:I")
ErgLD = Application.WorksheetFunction.CountIf(LD) > 500000
MsgBox ErgLD

End Sub

möchte ich gerne die Anzahl an Werten die über 500.000 sind anzeigen lassen. Leider nimmt Excel dies so aber nicht an. Was mache ich falsch?

Gruss,
Martin