date

D

darringates

i am trying to take a date in a date field and add the next month then get the difference in days, please help
 
E

Elwin

Dim dte as Date
Dim intDays as Integer
dte = #1/1/2004#
intDays = DateDiff("d",dte,DateAdd("m",1,dte))
-----Original Message-----
i am trying to take a date in a date field and add the
Click to expand...
next month then get the difference in days, please help
 
T

Tim Ferguson

i am trying to take a date in a date field and add the next month then
get the difference in days, please help
Click to expand...

It's the same as the number of days in the current month, so:

Day(DateSerial(Year(MyDate), Month(MyDate)+1,0)


Tim F
 
Top