MickG, When I tried it in a blank woorkbook it worked fine. When I added it to the project I am working on It does not work and the debugger kicks in. I will try to post the workbook to the forum so you can see it. Thanks in advance! Randy