For Each loop; worksheets.range

This should be a very simple procedure. I can't tell what is wrong. In the end the words "It worked" should populate to the far right. Not sure if I am incorrectly using the "concat" object variable in the IF statement. I'm not receiving any error messages. The hour glass does show after I run the macro, so something is happening. Can anybody offer some insight?

Please Login or Register  to view this content.

You should supply a sample workbook for somebody to work with

I am assuming there could be a missing dim

Please Login or Register  to view this content.