Hi,

I'm having a problem subtracting a date. I have a weekending date and then the user selects if the week is 5,6, or 7 days long. I'm using the dateadd function to subtract the selected days from the weekending date. For some dates it works, but for others it is one day off. Any ideas why this may be happenning? This is what I have set up:
    iRange = Me.cboDays.Value
    Me.txtStop = Me.txtStop1 & "/" & Me.txtStop2 & "/" & Me.txtStop3
    Me.txtStart = DateAdd("d", (-iRange), Me.txtStop)

Thanks,
Dave

The problem is in the assignment of Me.txtStop. From the way you're setting it up, you're going to end up with text "12/6/2007" instead of a real date. Therefore, you need to convert it.

Me.txtStop = CDate(Me.txtStop1 & "/" & Me.txtStop2 & "/" & Me.txtStop3)

or better yet

Me.txtStop = DateSerial(CInt(Me.txtStop3), CInt(Me.txtStop1), CInt(Me.txtStop2))

Then the DateAdd will know what to do with Me.txtStop.


Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division

Thanks Serrano, that makes sense.
I used the dateserial suggestion and it seems to be consistent now. The DateAdd was coming back with a start date one day earlier than it should be, but I made it subtract 1 from the iRange and it looks like it is working fine now.

Thanks,
Dave