Requiring a feild based on another feild's drop down menu

[srmezick]

I have a table (Employee Information) which contains (among others) the feilds Status, Termination Date, and Termination Reason. I know nothing about writing code so if someone wouldnt mind jotting me a code that would make the feilds Termination Date and Termination Reason required when the Status is changed to "Terminated" in the drop down box. (Ill also need to know whether to put it in the update before or after or whichever place it will need to go. Thanks!



If necessary I have the same fields in a form "Employee Snapshot", which is where the information will be recorded, and ideally this function would run from that form.

So if the feild Status = Terminated from drop down box, need feild "Termination Date" and feild "Termination Reason" to be required in the form Employee Snapshot.

Trying to be as specific as possible.

[pbaldy]

It would go in the before update event of the form:

http://www.baldyweb.com/BeforeUpdate.htm

Post back if you have trouble with your specific test.

[srmezick]

If Len(Me.SomeControl & vbNullString) = 0 Then
MsgBox "You need to fill out SomeControl"
Cancel = True
Me.SomeControl.SetFocus
End If

would become:

If Len(Me.TerminationDate & vbNullString) = 0 Then
MsgBox "You need to fill out Termination Date!"
Cancel=True
me.TerminationDate.SetFocus
End If

??

Can I make it dependent on if the expression in Status = "Termination"?

As they wont need a termination date or reason for employees that are not terminated.

[pbaldy]

Your test becomes:

If Me.Status = "Termination" And Len(Me.TerminationDate & vbNullString) = 0 Then

For a date, you can also test with IsDate, so something like:

If Me.Status = "Termination" And Not IsDate(Me.TerminationDate) Then