Hi Ben,

I thought we had already done this one last week?

Anyway

sFilename = "C:\Documents and Settings\Ben Allen\" & _
"My Documents\Eurotours\Eurotours" & _
Format(Date,"yyyy mm") & ".xls",

ActiveWorkbook.SaveAs Filename:= sFil;ename, _
FileFormat:=xlNormal, _
Password:="", _
WriteResPassword:="", _
ReadOnlyRecommended:=False, _
CreateBackup:=False

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Ben Allen" wrote in message
...
I have this code:
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Ben Allen\My
Documents\Eurotours\Eurotours.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False

Is there a wat to make it say the current month and year after the
Eurotours
bit in the name?
Thanks

--
Cheers,
Ben

Remove your.tonsils to reply
"You only live once but if you do it right once is enough!"