Might I suggest you wrap your code with code tags ( makes it easier to copy) ?

Just edit your post, click "go advanced", select your code and click the # button, then save.


Thx

__________________
Using O365 v2503 - Did you know you can thank someone who helped you? Click on the tiny scale in the right upper hand corner of your helper's post

Ooops Sorry ..Thanks for the Quote Tip
Robert

search will not work if the range is not contiguous, you need another approach, you range can be split in 3 contiguous ranges.

Thanks for the reply Catalin.B, but what I can't grasp is why it works if it's in the Main Sub but not if it's in a separate sub routine.
Regards Robert