add date+given text in the file name

[Dora C]

Hello,

I would like to save a workbook (bigfile1.xls) with "_values only_ddmmmyyyy" text added to the name. (=the result should be a workbook called bigfile1_values only_ddmmmyyyy.xls)
I have the date in dd-mmm-yyyy format in sheet 'header', cell BK3 of workbook bigfile.xls.

What is the syntax for diong this please, added to the below?

ActiveWorkbook.SaveAs Filename:= _
"C:\....path\bigfile1.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=True, CreateBackup:=False

Thank you!
Dora

[antoka05]

You can try with:

myText = "_values only_"
myDate = Format(Range("bk3"),"ddmmmyyyy")
ActiveWorkbook.SaveAs Filename:= _
   "C:\....path\bigfile1" & myText & myDate &".xls"

Regards,
Antonio

[Jokacave]

Hi Dora C,

Or this

ActiveWorkbook.SaveAs Filename:= _
"C:\....path\bigfile1_values only_" & Format(Now, "yyyy_mm_dd - hh mm"), FileFormat:=xlNormal, _
Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=True, CreateBackup:=False

And I think you don.t need this part

, _
Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=True, CreateBackup:=False