Autoupdate

[Keith]

I'm trying to update my completion date based where my TCP is true,
and then use the Date of Request. This is what I've written, but
its not updating.

Private Sub Completion_Date_Enter()
If IsNull(Me.Completion_Date) = False And Me.TCP = True Then
Me.Completion_Date = Me.Date_of_Request

Any suggestions?

[Allen Browne]

Did you mean to set the completion date only if it IS null? The exrpression:
IsNull(Me.Completion_Date) = False
would only be true if the text box is NOT null.

Would it make sense to use the AfterUpdate of the TCP (checkbox?)? That way
it gets set regardless of whether the user ever sets focus to the date box
or not.

Private Sub TCP_AfterUpdate()
If (Me.TCP.Value) And IsNull(Me.Completion_Date) Then
Me.Completion_Date = Me.Date_of_Request
End If
End Sub

--
Allen Browne - Microsoft MVP. Perth, Western Australia.
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"Keith" <ko******@earthlink.net> wrote in message
news:8c**************************@posting.google.c om...

I'm trying to update my completion date based where my TCP is true,
and then use the Date of Request. This is what I've written, but
its not updating.

Private Sub Completion_Date_Enter()
If IsNull(Me.Completion_Date) = False And Me.TCP = True Then
Me.Completion_Date = Me.Date_of_Request

Any suggestions?