This works for me...
but why can't i put multiple OR's on one line? like this:Code:Sub Check1() If strCheck1 = "C-5" Then strMachine = strCheck1 ElseIf strCheck1 = "C-6" Then strMachine = strCheck1 ElseIf strCheck1 = "C-7" Then strMachine = strCheck1 ElseIf strCheck1 = "C-8" Then strMachine = strCheck1 Else strMachine = Null End If End Sub
Code:Sub Check1() If strCheck1 = "C-5" or "C-6" or "C-7" or "C-8" Then strMachine = strCheck1 Else strMachine = Null End If End Sub