Open external spreadsheet and save it to a folder with a specified name.

[rimshot609]

I'm looking for a macro that will allow me to click on a CommandButton in one spreadsheet that opens a separate excel file and saves the file to a folder with the name I specified in the command button spreadsheet on cell A1.

Example:
I have two excel files in a folder called music. One file that has the command button is called Drums. The other file is called Pianos. There is a folder within the (music) folder called 'New Files'. I would like to enter a file name title in A1 of Drums, click on the command button, and it automatically open the Piano file and save it to the 'New Files' folder with the name I placed in cell A1 of Drums. (It doesn't necessarily need to open the file but I need the data to be refreshed)

Thanks!

[k64]

Sub SaveAs()
With Workbooks.Open(filepath)
    .SaveAs (newfilepath)
    .Close False
End With
End Sub