Days between two date

[Forestq]

I have two date. I want to count number of days between.

Dim date_today, test_date As Date
Dim result as Long
date_today = Format(Now(), "dd/mm/yyyy")

test_date = Format(wsM.Range("M10").Value, "dd/mm/yyyy")

result= DateDiff("D", date_today, test_date)

But the result is wrong, it's 539. When I opened the debugs I see that date_today is Variant/String Type.

 

[FormR]

Hi, is it any better if you declare your variables properly, don't invoke the Format() function and use Date instead of Now()

i.e.

Dim date_today As Date, test_date As Date
Dim result As Long
date_today = Date

test_date = wsM.Range("M10").Value

result = DateDiff("D", date_today, test_date)

 

[Forestq]

ok thanks, just tested and working correctly!