Move Active Workbook to another Folder
 

I have a workbook that I currently work out of every day inserting new
data and saving as a new workbook to keep the original clean. But
when I am finished with the workbook I need it saved in another folder
to cut down on what is seen in the inital folder. What I would like
to do is either move the active workbook to the alternate folder, or
do a save as to the alternate folder and delete the original workbook,
using a macro for either method. Any help would be great.

Thanks.