That worked! Thank You
I have just one question. I inserted this function as a new module. When I
change the values the cell with the QWERTY function does not update untill I
hit F2 and press enter. It won't update even when I hit the calculate
button. With multiple cells I have to update each cell individually each
time. What's going on?

"Gary''s Student" wrote:

How about in A1 thru A4

=
1
<
2


then anywhere =QWERTY() will give you TRUE:

Function qwerty()
Dim s As String
s = Cells(1, 1) & Cells(2, 1) & Cells(3, 1) & Cells(4, 1)
qwerty = evaluate(s)
End Function
--
Gary's Student


"Sloth" wrote:

I want to combine cells into a logical test. I can't explain what I want, so
here is an example.

Example 1:
Input
A1: 1
A2: <
A3: 2
A4: ???Formula???
Result
A4: True