combo box with auto date when selecting item listed 1

[noahaz]

I am new to access and am creating a database that keeps tracks of the jobs in our department. My manager has asked me to create a combo box with: "In Queue", "In Progress", and "Completed". When completed is selected the date completed will be added to the job and it will automatically close out. How do I do this? Do I need to add a space in the table for the close date?
Thanks,
Noah

 

[PHV]

Yes, you may consider adding a new DateTime field named, say, dtClosed in your job table.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[noahaz]

How do I make the combo box when "completed" is selected to automatically add the date closed and close the job???

 

[PHV]

In the AfterUpdate event procedure of the combo:
If Me![combo name] = "Completed" Then
Me![dtClosed control name] = Date()
End If

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[noahaz]

Private Sub Combo16_Change()
If [Combo16] = "Completed" Then
[dateclosed] = Date
End If


End Sub

Ph, thanks for your help is this correct?

 

[PHV]

I prefer the AfterUpdate event instead of the Change one.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886