macro save file with specific name

[Beatrice]

Hi everyone, I am very new to Marco, it would be glad to get some help here

Here is my trial:


DD = Day(Date)
MMM = Month(Date)
YY = Year(Date)
WBK = "S:\Project" & Format(Now, "DD MMM YY") & ".xlsx"

Windows("Destination File.xlsx").Activate
ActiveWorkbook.SaveAs Filename:=WBK, FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
ActiveWindow.Close


So far, it is working. But I would like to add a cell value into the file name.
Example: Cell A2 = "Item Code"
I am expecting the file to be save as " S:\Project\Item Code - 28 Oct 19.xlsx"

Can anybody give me a hand?
Thank you.

 

[yky]

Insert A2 in between like this:

WBK = "S:\Project" & A2 & Format......

 

[yky]

Need a back-slash after the word "Project". I don't know why the web site kept removing it.

 

[Beatrice]

Thank you for the tips! I got it now~

WBK = "S:\Project" & Range("A2") & Format(Now, "DD MMM YY") & ".xlsx"