RE: Auto fill

Tech-Archive recommends: Repair Windows Errors & Optimize Windows Performance

Thanks for your help, but I must be missing something.

I put the code in and still nothing.

here is what I have:

Private Sub txtReason_AfterUpdate()

If Nz(Me![txtReason], "") = "" Then
Me![txtReason] = "Active"

End If

End Sub

Am I missing something to easy here?

thom



"glconsultants" wrote:

thom,

In the AfterUpdate event of the relevant field use the following code:

if nz(me.[fieldname] , "") = "" then
me.[fieldname] = "Active"
end if

This will ill the field with 'Active' if the field is blank or null.

Regards,

Graham
G & L Consultants
MSCAS - ACCESS 2007

thom wrote:
they want to insert "active" after the field is filled in.

thom

??? Do you want to assign it a default value "Active" so users will overwrite
it if needed, or do you want it to insert "Active" in the field after the
[quoted text clipped - 5 lines]

Thanks


.

Relevant Pages