Update field - how to calulate a new date

[jd_boss_hogg]

Hi All - can somebody give me advice on calculating a date field please ?

I have a form with "due date" (format: medium date). When i click in another field, i want this value to update, calculated by today's date.

So my calculation needs to be

Newduedate = (today date - due date) +due date

Example, original due date was Feb 10th..... i click on the "update" field on Feb 15th. I now want new due date to be 20th Feb (so "today" + 5 days)

What calculations can i do ? I cant seem to do calculations on dates?

 

[arnelgp]

if you are using Form, you can use AfterUpdate event of DueDate textbox.

Private Sub DueDate_AfterUpdate()
dim var as variant
var=nz(Me!DueDate.OldValue, 0)
if var<>0 then
    Me![DueDate] = DateDiff("d", var, Me.DueDate) + Me.DueDate
End If
End Sub

 

[CJ_London]

Dates are stored as numbers so just add and subtract as required

your calculation doesn’t make sense to me - so if today is 10 days after the due date- you want to add 10 days? And if today is 10 days before the due date, you want to deduct 10 days?

 

[plog]

Newduedate = (today date - due date) +due date

Click here to learn about an algebraic cancellation trick mathematicians don't want you to know about.