Hi Mike

You'll need to add this line of code after the pasting has been done

----------------------
Thisworkbook.Sav
----------------------

This will save the whole workbook automatically. Note that if a series of pasting is done, it may be annoying to the user for having to wait for the file to save each time, so you may want to put this code within the BeforeClose event so that it only saves once

SuperJas.