Rename file based on current date

Hi guys,

I want to rename excel file based on current date and i would prefer the
format as "ddmmyy". Here is part of the coding:

ActiveWorkbook.SaveAs Filename:= "C:\qadzidr\My Documents\29Apr05am.xls" _
, FileFormat:=xlNormal, Password:= _
"", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:= _
False

Appreciate ur help!!

ActiveWorkbook.SaveAs Filename:= "C:\qadzidr\My Documents\" &
Format(Date,"ddmmmyy") & "am.xls"

--
HTH

Bob Phillips

"wira" <[email protected]> wrote in message
news:[email protected]...
> Hi guys,
>
> I want to rename excel file based on current date and i would prefer the
> format as "ddmmyy". Here is part of the coding:
>
> ActiveWorkbook.SaveAs Filename:= "C:\qadzidr\My Documents\29Apr05am.xls" _
> , FileFormat:=xlNormal, Password:= _
> "", WriteResPassword:="", ReadOnlyRecommended:=False,
CreateBackup:= _
> False
>
> Appreciate ur help!!