Macro to save file with its current name but in a different, specified location

[shivanikharbanda]

Hey guys - struggling here.

I have a macro and I want to end it with saving the file in a specified location - not the current location where I am opening the file from. When I use this macro again, it will always need to be saved at that specified location. However, I want to save it as the name of the original file.

C :\ Resume

would then be in

J:\ Resume

Same name, different location. Let me know if I need to give more information...I'm new at this.

I appreciate any help I can get - thank you!

 

[davesexcel]

Do you want to turn the "C" into a "J" ?

    Dim Dr As String
    Dim Wnm As String
    Dim MyWB As String
    Application.DisplayAlerts = 0
    Dr = Replace(ThisWorkbook.Path, "C", "J") & "\"
    Wnm = ThisWorkbook.Name
    MyWB = Dr & Wnm
    ActiveWorkbook.SaveAs Filename:=MyWB