Filling in related data

[BB]

I am trying to use the following:

Private Sub AdjustmentDate_AfterUpdate()
Me!TransactionDate = Me!AdjustmentDate
End Sub

I would like to have today’s date as the default for AdjustmentDate; however, if the default is used, the TransactionDate doesn’t get updated. Is there a solution to my problem?

Thanks, NewToAccess, BB

 

[Rich]

Then just use Me.TransactionDate=Date

 

[BB]

But the user does have the option of changing the date to something other than the default date?

 

[jwindon]

Lock the control in form view.

 

[BB]

I would like to put a default date in because most of the time that will be the date needed, but not always. The user needs to be able to change it.
After the date is updated, I need to copy it to another field. However, if the user goes with the default date, it doesn't get updated to the other field.

 

[Pat Hartman]

Set the same default for both dates.