Save Current workbook in new folder

[Siderman]

Hey Folks,

I have been searching relentlesly for a simple code to save open active workbook as value in cell a1 in a new folder named as value in cell a1 on desktop of whomever is using workbook.

P.S. Thanks for all the great tips from everyone out there

 

[taurean]

Just add the following line at the bottom of code (before "End Sub" though):

ActiveWorkbook.Close True

 

[taurean]

Just add following line at the bottom of the code:

ActiveWorkbook.Close True

 

[Siderman]

Perfect!! Thanks again Your input is greatly appreciated.