Excel VB how to save file including date in a filename?

Question

In an Excel Macro, I want to save a file as a report and append the filename with the current date.
Right now the code below stores the file as
Pipeline Report.xls
I would like it to be stored as:
Pipeline Report .xls

This is the code I currently have in there:
ActiveWorkbook.SaveAs Filename:= _
"C:\Pipeline Report.xls", _ ....
Could you perhaps tell me how to use a date function in the syntax for the file name assignment?

Thanks for your help.

Answer 1

Use format$ function eg
format$(now(),"YYYY-MM-DD")

Answer 2

Here's the command I use:

NewFileName = "My_File_" & Replace (Str (Format(Now, "yyyymmddhhmmss")), " ", "")

I have the date formatted down to hours, minutes and seconds. I do this so that I can save the file as often as I want and get a new file name every time.

Hope this helps!

Regards,
QwertyKPH @ Yahoo!

Answer 3

sFilename="blah\blah" & now

ActiveWorkbook.SaveAs Filename:= sFilename

Look up the VBA date-time constants to figure out how to get the exact format you want.