Vba: how many dates in a range greater then a certain date

[Nelson78]

Hello everybody.

I've a variable date

date1

and a range populated by dates

rng

How can I count how many dates in the range are greater then date1?

I'm trying this:

result = Application.CountIf(rng, ">" & date1)

but it doesn't work ( result = 0 ).

Thank's in advance for helping me.

 

[Nelson78]

Probably this is the solution:

result = Application.CountIf(rng, ">" & CLng(date1))