Using multiple inequalities in an if statements

[Nauticulus]

Hi,

I'm trying to check two cell values where both must be within the same range like this...

If 1<=Cell a<=6 and 1<=Cell b<=6 then execute

This is what I have at the moment...

If ws2.Cells(d, "B").Value <= 6 And => 1 And ws2.Cells(d, "C").Value <= 7 And => 1 Then

Thanks

 

[Joe4]

Welcome to the Board!

Each part of it must be a complete statement, i.e.

If ws2.Cells(d, "B").Value <= 6 And ws2.Cells(d, "B").Value >= 1 And ws2.Cells(d, "C").Value <= 7 And ws2.Cells(d, "C").Value >= 1 Then

To me, this can sometimes be confusing to look at, so I add parentheses:

If (ws2.Cells(d, "B").Value <= 6) And (ws2.Cells(d, "B").Value >= 1) And (ws2.Cells(d, "C").Value <= 7) And (ws2.Cells(d, "C").Value >= 1) Then

 

[Rick Rothstein]

Welcome to the Board!

Each part of it must be a complete statement, i.e.

If ws2.Cells(d, "B").Value <= 6 And ws2.Cells(d, "B").Value >= 1 And ws2.Cells(d, "C").Value <= 7 And ws2.Cells(d, "C").Value >= 1 Then

To me, this can sometimes be confusing to look at, so I add parentheses:

If (ws2.Cells(d, "B").Value <= 6) And (ws2.Cells(d, "B").Value >= 1) And (ws2.Cells(d, "C").Value <= 7) And (ws2.Cells(d, "C").Value >= 1) Then

This is a personal preference, but I think it helps make things clear when and if the code ever has to be revisited in the future... I like to arrange the logical operations so that natural looking "ranges" (1<=x and x<=6) are displayed. Given that, here is how I would rearrange your second code line (I fully agree with you about the parentheses)...

[table="width: 500"]
[tr]
	[td]If ((1 <= ws2.Cells(d, "B").Value) And (ws2.Cells(d, "B").Value <= 6)) And ((1 <= ws2.Cells(d, "C").Value) And (ws2.Cells(d, "C").Value <= 7)) Then[/td]
[/tr]
[/table]