Save in different folder

[S.S.]

I want to save a workbook in a different folder. The folder already exists,
and I want to use the same file name. What is correct code to do this?

 

[Chip Pearson]

Try code like the following:

Sub AAA()
Dim NewPath As String
NewPath = "D:\Temp\" & ThisWorkbook.Name
ThisWorkbook.SaveAs Filename:=NewPath
End Sub


Change the "D:\Temp\" to the full folder path to which you want to
save the file.

Cordially,
Chip Pearson
Microsoft Most Valuable Professional,
Excel, 1998 - 2010
Pearson Software Consulting, LLC
www.cpearson.com