Add the folder's path in front of the Format statement. For example...
ActiveWorkbook.SaveAs "c:\temp\" & Format(Date, "yyyy-mm-dd") & ".xls"
Rick
"Hoyos" wrote in message
...
Thanks Bob.
Will this save the worksheet copied to another folder?
--
Hoyos
"Bob Phillips" wrote:
Sub SaveMyWorkbook()
Worksheets("Sheet1").Copy
ActiveWorkbook.SaveAs Format(Date, "yyyy-mm-dd") & ".xls"
End Sub
--
HTH
Bob
(there's no email, no snail mail, but somewhere should be gmail in my
addy)
"Hoyos" wrote in message
...
How can I save a worksheet from a workbook to another workbook and name
it
date saved at using a vb code. And any additional sheet to be saved in
the
same workbook.
My aim is to be able to save a stat sheet automatically once a week.
--
Hoyos