Need VBA Code To Save File As To New Location With New Name

[excelbytes]

I have a file template that I use to enter data into. Afterwards I need to save it with a new name based on the text in a specific cell and to another file location. I have two pieces of code:

Dim name As String
name = Worksheets("OFFICIAL DRAFT").Range("I2").value
ActiveWorkbook.SaveAs Filename:=name

ActiveWorkbook.SaveAs Filename:= "N:\Parts Technical\Mark\MPA New Part Adds\......"

I need to combine these two so that the file is saved to the "N" location based on the name in cell I2 of the OFFICIAL DRAFT worksheet.

Thanks in advance for your help!

 

[6StringJazzer]

Assuming the full path name for the destination folder is shown above:

Dim name As String
name = Worksheets("OFFICIAL DRAFT").Range("I2").value
ActiveWorkbook.SaveAs Filename:= "N:\Parts Technical\Mark\MPA New Part Adds\" & name

Note that a SaveAs will mean that the currently open file is now the new copy of the file in the new location. You are no longer editing the original file at this point.

 

[excelbytes]

Works great, thanks!

 

[6StringJazzer]

You're welcome, glad it worked the first time!