A Select Case block seems the right approach. But those Case statements won't work. The OP list sample activity code values as 1.1, 1.2, 1.3 ...Originally Posted by Imdabaum
None of those will match Case 1
If cboActivity.Value is numeric, use:
[VBA]Select Case Int(Me.cboActivity.Value)[/VBA]
If cboActivity.Value is a string, use:
[VBA]Select Case Left(Me.cboActivity.Value, 1)
Case "1"
Case "2"[/VBA]
(No colons after Case statements.)
In addition to doing this for On Current, I think he may need to do it for cboActivity After Update.