Thanks for posting this. All I did was take your code and place it in a module rather than in the worksheet code. This is exactly how Microsoft suggests to write functions. After I did that it worked no problem. The only thing I can think of as to why it worked before could be your worksheets weren't arranged the way they are now. Don't worry too much about as to why since putting it in it's own module works. Give that a shot and let us know.

Did you get a chance to put it in its own module and try it? Let us know if you got it to work. If not we are still here to help.