Can someone explain to me why this IF statement is not failing?

[Vita]

I felt like this image explains it faster but below I have text.


Basically the code is

Dim Boo1, Boo2, Boo3, Boo4, Boo5 As Boolean

Boo1 = False
Boo2 = False
Boo3 = False
Boo4 = False

Boo5 = True

If Boo1 Or Boo2 Or Boo3 Or Boo4 And Not Boo5 then
Do something
End If

So it shouldn't be activating because Boo5 is true which should be cancelled out by the Not. At least that is my understanding and yet it still activates.
I can easily work around it by using a nested If statement but I want to know why it doesn't work.

Thanks in advance!

[June7]

In your declaration line the only variable declared as Boolean is the last one, the others are Variant. VBA requires each variable type to be declared individually or it defaults to Variant.

Dim Boo1 As Boolean, Boo2 As Boolean, Boo3 As Boolean, Boo4 As Boolean, Boo5 As Boolean

You are mixing AND and OR operators. Might need to use parentheses to control the order of operations (remember Algebra lessons).

If (Boo1 Or Boo2 Or Boo3 Or Boo4) And Not Boo5 Then

[Vita]

In your declaration line the only variable declared as Boolean is the last one, the others are Variant. VBA requires each variable type to be declared individually or it defaults to Variant.

Dim Boo1 As Boolean, Boo2 As Boolean, Boo3 As Boolean, Boo4 As Boolean, Boo5 As Boolean

You are mixing AND and OR operators. Probably need to use parentheses to control the order of operations (remember Algebra lessons).

If (Boo1 Or Boo2 Or Boo3 Or Boo4) And Not Boo5 Then

REALLY?! I have been under the impression it just took whatever the last one was defined as!!!!! Ugh I have to go change a ton of variables. Thanks very much!

Also thanks on the parentheses

[June7]

I tested your code. Unaltered, it does not 'activate' - it does not enter the If Then. Instead of Do Something, use Debug.Print "test". So what is different about your real code? What is the value of each of the variables?