Or function not operating as expected

[athyeh]

Hello,

I have the following code:

Do While Range("A1").value <> "Carrot" Or Not Range("A1").value Like "Apple*"
sheet1.rows(1).delete
Loop

I want this to delete rows until the A1 says "Carrot" or "Apple Juice" but it keeps on deleting all rows no matter what value it is in. When viewed in isolation it works but not as an "Or" function so feel like there's something with the way I'm using "Or"? but usage seems congruent based on web examples.

Thanks in advance,

Tony

[romperstomper]

You want And, not Or. If A1 is Carrot, then Not A1 Like "Apple*" will be True, so Or would return True, and the code will carry on.

[athyeh]

thank you very much.

[romperstomper]

Glad to help, and thanks for the rep.