Default Value

[Floyd Forbes]

Hi

I have a form in which one field is called date. The dates
entered are often the same for a period of time so I would like the
default value for this field to be the same as the last entered date.
Can anybody please help me with how to do this.

Thank you

 

[Atilla Yildirim]

On the form open event

me.datefieldname.defaultvalue=nz(dmax("datefieldname","tablename",""),now())

if table is empty this code brings today by default.

Atilla

 

[Dirk Goldgar]

Hi

I have a form in which one field is called date. The dates
entered are often the same for a period of time so I would like the
default value for this field to be the same as the last entered date.
Can anybody please help me with how to do this.

Thank you

Private Sub Form_AfterUpdate()

With Me![Date]
.DefaultValue = Format(.Value, "\#mm/dd/yyyy\#")
End With

End Sub