VBA IFERROR syntax problem

[ArfArfArf]

I am trying to evaulate the value of a cell under three conditions

1. If IsError(Range(strAdd).Offset(0, y - 1).Value)
Or
2. Range(strAdd).Offset(0, y - 1).Value = ""
Or
3. Range(strAdd).Offset(0, y - 1).Value = 1 Then

1 is causing the problem. On its own it runs fine, and gives me the result I expect. If I try to combine it with the other two. i.e.

If IsError(Range(strAdd).Offset(0, y - 1).Value) Or Range(strAdd).Offset(0, y - 1).Value = "" Or Range(strAdd).Offset(0, y - 1).Value = 1 Then

it causes the code to fail. I'm sure its a small correction but I can't see it.

Thanks

Arf

 

[Jonmo1]

You'll have to do it on seperate lines..

Because even though you're testing the range for error, EVERY argument in the OR is tested..
so if the Range is an error, it's STILL testing if that error = ""...resulting in an error.

so you have to break it out into seperate lines..

IF IsError(Range(strAdd).Offset(0, y - 1).Value) Then
    Do this
Else
    If Range(strAdd).Offset(0, y - 1).Value = "" Or Range(strAdd).Offset(0, y - 1).Value = 1 Then
        Do this
    End if
End If

 

[ArfArfArf]

Fair enough....

Thanks for the quick reponse

 

[Jonmo1]

Glad to help, thanks for the feedback