Thanks for the reply Chip, looks like a really simple solution, to save
the worksheet as the worksheetname and cell A1.value would i have to
add ActiveSheet.Name = "Week " & "Starting " & Range("A1").Text
as i would like to save any worksheet in the workbook named by the
worksheet as its own name +A1.value.....if you like....i would want to
save now and in future all sheets named Week1 in a workbook called
week1 but when the sheet is actually saved in this work book name the
sheet its own name+A1.value, i have 6 weeks in all and when any week
becomes older than N0W by 1 week then execute the save sheet code,
eventually i will end up with 6 workbooks named Week1, Week2....etc all
growing in size with sheets being added as they meet the criteria for
saving!

i've just read all that and it sounded murky to say the least....still
that was my brain dump!......ok brain CELL dump!

Regards,
Simon


--
Simon Lloyd
------------------------------------------------------------------------
Simon Lloyd's Profile: http://www.excelforum.com/member.php...fo&userid=6708
View this thread: http://www.excelforum.com/showthread...hreadid=552803