How can I save a daysheet as today's date

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Elfego Baca - 24 Jan 2007 23:36 GMT

I have a daysheet that automatically enters the date in cell D1 as
value(Today()). Now I would like to be able to automatically save the
sheet as the date in the form 01-24-07.

Reply to this Message

Earl Kiosterud - 24 Jan 2007 23:52 GMT

Elfego,

Format the cell. Format - Cells - Number Tab - Custom. mm-dd-yy, or
dd-mm-yy as you want it.

Be aware that when you open this workbook on a later date, the date
displayed will have changed. To lock it to the current date, Copy, then
Edit - Paste Special - Values.

Signature

Earl Kiosterud
www.smokeylake.com
-----------------------------------------------------------------------

>I have a daysheet that automatically enters the date in cell D1 as
>value(Today()). Now I would like to be able to automatically save the sheet
>as the date in the form 01-24-07.

Reply to this Message

Earl Kiosterud - 25 Jan 2007 19:08 GMT

Elfego,

It might be easier just to put in todays date with Ctrl + ;. Then press
Enter.

Signature

Earl Kiosterud
www.smokeylake.com
-----------------------------------------------------------------------

> Elfego,
>
[quoted text clipped - 8 lines]
>>value(Today()). Now I would like to be able to automatically save the
>>sheet as the date in the form 01-24-07.

Reply to this Message

Gord Dibben - 25 Jan 2007 00:21 GMT

When you say "sheet" do you mean workbook or worksheet?

Do you mean save the workbook with the date as name of workbook?

Do you mean save just one sheet as a new workbook with date as name?

Or just rename that worksheet as date?

Gord Dibben MS Excel MVP

>I have a daysheet that automatically enters the date in cell D1 as
>value(Today()). Now I would like to be able to automatically save the
>sheet as the date in the form 01-24-07.

Reply to this Message

Elfego Baca - 25 Jan 2007 01:01 GMT

I man the workbook

> When you say "sheet" do you mean workbook or worksheet?
>
[quoted text clipped - 9 lines]
>> value(Today()). Now I would like to be able to automatically save the
>> sheet as the date in the form 01-24-07.

Reply to this Message

Gord Dibben - 25 Jan 2007 04:05 GMT

Elfego

If your regional settings default date contains slash(/) marks, Excel won't
accept them.

Best to leave the cell reference out of it and just saveas current date.

Sub Rename_WkBk()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path _
& "\" & Format(Date, "mm-dd-yy")
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

Gord

>I man the workbook
>
[quoted text clipped - 11 lines]
>>> value(Today()). Now I would like to be able to automatically save the
>>> sheet as the date in the form 01-24-07.

Reply to this Message

Rate this thread: