Help with the Do While Loop

[PresidentEvil]

Hi,

Code mentioned below has an issue to it. I have two columns ( A & B )

A contains unique IDs
B contains values

I'm using a macro with a loop to update the values in B column for respective IDs. However, the condition to stop the loop is not working. The null value condition is working without a problem but the condition after 'OR' operator is not working. Purpose is to stop the loop when there is a blank in column A or has the text "Access Denied" in column B.

Any hep is highly appreciated.

Set indexSheet = ActiveSheet
Sheets("Update").Select
irow = 2
A1 = 2
Do While indexSheet.Cells(irow, 1).Value <> vbNullString Or indexSheet.Cells(irow, "B").Value <> "Not Authorized"

' codes to run in the loop is here (I use SENDKEYS)

irow = irow + 1
A1 = A1 + 1
Loop
On Error GoTo 0
[/CODE

 

[MARK858]

Tried it. It's not stopping/skipping at "Not Authorized" in B Column or blank cell in A column.

It isn't supposed to stop at "Not Authorized" in B Column as you stated

skip the row if the value contains 'Not Authorized' and just move to next row and continue with the loop.

and you didn't ask for the stop at blanks in column A in that part of the question.

The code in post number 4 by Mohadin does stop at both blanks and Not Authorized (if you change "Access Denied" to "Not Authorized")

 

[PresidentEvil]

It isn't supposed to stop at "Not Authorized" in B Column as you stated


and you didn't ask for the stop at blanks in column A in that part of the question.

The code in post number 4 by Mohadin does stop at both blanks and Not Authorized (if you change "Access Denied" to "Not Authorized")

I made it a bit complicated since the other steps after this code are executed are very important and highly dependant on blanks or the text not authorized,

I found another way to execute this without a loop. Both the codes worked after making a few alterations.

 

[MARK858]

Happy you worked it out

 

[PresidentEvil]

Happy you worked it out

Thank you for helping out.