Sub test()
Dim wkb As Workbook
Dim pth As String
Dim myname As String
pth = "C:\Documents and Settings\user\Desktop\"
myname = "ashish"
' or try this
'myname = Application.UserName
' or try this
'myname = Environ("username")
Set wkb = ActiveWorkbook
wkb.SaveAs pth & myname & VBA.Format(Date, "_dd
You can WRITE macro for this.
Fairly simple.
There are LOTS of questions though, in order to make it fit your situation.
Q: Are you wanting to save a COPY of the existing file?
as in:
open a template file,
read data,
perform calculations,
do stuff,
save a copy with current data with today's