F
Flydianslip
Can anyone help me?
I had this figured out in MS Access 2003 but now I'm working in 2007 and my
previous code doesnt work.
I have a form in which I have a Combo Box named "Status1" and the Control
Source is "Status". The Row Source is "Pending";"Active";"On
Hold";"Completed".
Type is Value List.
I also have a field named "completed" who's Control Source is "Date Completed"
I want a AfterUpdate when the Combo Box is set to "Completed" the Date
Completed fills in todays date. But when the Combo Box is anything else it
just leaves the Date Completed blank or null.
Thank you for any help.
This is what I have so far but it doesnt work.
Private Sub Status1_AfterUpdate()
If Me.Status1 = "Completed" Then
Me.[Date Completed] = Date
Else
Me.[Date Completed] = Null
End If
End Sub
I had this figured out in MS Access 2003 but now I'm working in 2007 and my
previous code doesnt work.
I have a form in which I have a Combo Box named "Status1" and the Control
Source is "Status". The Row Source is "Pending";"Active";"On
Hold";"Completed".
Type is Value List.
I also have a field named "completed" who's Control Source is "Date Completed"
I want a AfterUpdate when the Combo Box is set to "Completed" the Date
Completed fills in todays date. But when the Combo Box is anything else it
just leaves the Date Completed blank or null.
Thank you for any help.
This is what I have so far but it doesnt work.
Private Sub Status1_AfterUpdate()
If Me.Status1 = "Completed" Then
Me.[Date Completed] = Date
Else
Me.[Date Completed] = Null
End If
End Sub