add code to Save as todays date

[nathan663]

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\NGallichan\My Documents\Reports Testing\M&S Chargeable\M&S Chargeable.xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
I need to add a bit of code to save the spreadsheet as "M&S Chargeable "todays date"" in the format of "290810"

This spreadsheet has a macro run every other day, and now i just need it to save with the date as it is the day it is run... what code do i need to add to do this?

 

[VoG]

Try

ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\NGallichan\My Documents\Reports Testing\M&S Chargeable\M&S Chargeable" & Format(Date, "ddmmyy") & ".xls" _
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False