Workbooks("CheckUp.xls").SaveAs Format(Range("A4"), "mmm yy") & ".xls"

--
David

jonco wrote

The month changes each month.

It won't always be Jan 07. Next month it'll be Feb 07. It needs to get
the date from a cell..... Cell A4 for instance.



Thanks'

Jon

"merjet" wrote in message
oups.com...
Workbooks("CheckUp.xls").SaveAs "Jan 07"
'to delete old-named file
Kill "C:\path\CheckUp.xls.xls"

Hth,
Merjet