No, if you want that, best to be specific

Sub SaveMyWorkbook()
Worksheets("Sheet1").Copy
ActiveWorkbook.SaveAs "C:\myFolder\mySubFolder\" & 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
...
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