You can use the AfterUpdate event of the Control holding your data to set the DefaultValue for the Field. From that time forward, until you either manually change the data or close your form, the data will be entered automatically in each New Record.
Code:
Private Sub Purchase_date_AfterUpdate()
Me.Purchase_date.DefaultValue = """" & Me.Purchase_date. Value & """"
End Sub
which is valid for Text, Number and Date Datatypes. Never tried it on a Yes/No Field!
Linq ;0)>
The problem with making anything foolproof...is that fools are so darn ingenious!
All posts/responses based on Access 2003/2007