Message box if Cell equals Text

Hello,

I have formula in column R for example which is looking up to data in column Q the formula is a VLOOKUP with an IF basically if the text found in column Q is contained in a provided table then cell in column R returns the word "OK" if the text is not found then cell in column R returns the work "ERROR"

I would like to create a code which checks the text in column R and if cell = "ERROR" then a message box appears

The list in column Q & R are dynamic so I either need to check per cell and loop or look at the entire range of R:R

Thanks

A basic problem is that a cell changing as a result of a formula calculation does not raise the Worksheet_Change event so there is no easy way to run code when the cell contains "ERROR".

Conditional formatting might be a suitable workaround...

Hi cytop,

I've actually found a bit of code which is working quite well

Please Login or Register  to view this content.

the only problem I am having now is that this only works if the error is contained in cell R2 I cannot seem to work out how to loop this until column R is empty.

thanks

Bumping this if anyway has any suggestions on how to loop the above code through the column?
ie. the word Error may appear anywhere throughout column R at the moment the message box only appears if the word Error is found in cell R2

thank you