Thanks Joel..

I like what you've done there...
I do love the learning that comes with VB scripting :)

I have updated the code... I am at a loss though, I still get the error ...

I have found if I open the spreadsheet and just run that subroutine it
works.. if I close and do it again, it works, if I try a third time it gives
me the Run-time error....

Also if I run any other module before doing it it seems to error more
often...

Do you think this could be a memory issue as opposed to a coding issue?



"Joel" wrote:

Here is how I would write the code (see below). I avoid the select method
like you did below. I specifically reference each sheet and range as
required to avoid mistakes like you jusdt made.