This is part of a sub that does some things with 4 digit strings. cel is a range. This code shows a syntax error; what's wrong with it?
Code:For Each cel In MyRange If Left$(Cells(lngRow, "CR"), 3) = cel.value or_ Left$(Cells(lngRow, "CR"), 2) & Right$(Cells(lngRow, "CR"), 1) = cel.value or _ Right$(Cells(lngRow, "CR"), 3) = cel.value or _ left$(Cells(lngRow, "CR"), 1) & Right$(Cells(lngRow, "CR"), 2) = cel.value then Stop End If Next