Alright. How does this look.
Code:
Select Case Me.Status
Case "NEW"
Me.DATETIMENEW = Now()
Case "SEEKING"
Me.DATETIMESEEKING = Now()
Case "TRACED"
Me.DATETIMETRACED = Now()
Case "CONTACTED"
Me.DATETIMECONTACTED = Now()
Case "CONTACTED"
Me.DATETIMECONTACTED = Now()
Case "DEAD END"
Me.DATETIMEDEADEND = Now()
Case "AGREEMENT SENT"
Me.DATETIMEAGREEMENTSENT = Now()
Case "AGREEMENT RECEIVED"
Me.DATETIMEAGREEMENTRECEIVED = Now()
Case "DOCUMENTS REQUESTED"
Me.DATETIMEDOCUMENTSREQUESTED = Now()
Case "DOCUMENTS RECEIVED"
Me.DATETIMEDOCUMENTSRECEIVED = Now()
Case "SUBMITTED TO HOLDER"
Me.DATETIMESUBMITTEDTOHOLDER = Now()
Case "PENDING PAYMENT"
Me.DATETIMEPENDINGPAYMENT = Now()
Case "PAYMENT STATUS SENT"
Me.DATETIMEPAYMENTSTATUSSENT = Now()
Case "PAYMENT STATUS RECEIVED"
Me.DATETIMEPAYMENTSTATUSRECEIVED = Now()
Case "CLOSED"
Me.DATETIMECLOSED = Now()
End Select
So the case is somewhat like the if statement? Interesting. Just trying to figure it all out. Why did you decide to use case instead of if?