Quote Originally Posted by barebum
This is not where the error is occuring. The code works provided the workbook is not opened from another workbook. If it is the error occurs at "End sub". The rest of the code completed successfully. Including the saveas.
Maybe that is so, but you said you wern't doing a save. That line suggests that you are at least trying to.