Calculate 90 calendar days from date entered

[Guest]

I want to put a date in a cell and have the computer give the 90th calendar
date from original date. For example I put in 11/8/04 and the computer
calculates 2/7/05. Thanks

 

[Allen Browne]

Use the AfterUpdate event procedure of the first date to assign a value to
the 2nd.

This example assigns the ReturnDate field to be 90 days after the HireDate:

Private Sub HireDate_AfterUpdate()
Me.[ReturnDate] = DateAdd("d", 90, Me.[HireDate])
End Sub