I'm working on a large spreadsheet which lets say is work in progress and
therefore I have to resave it each time it is updated under a different name
to distinguish between each saved copy.

Is it possible to set up the Excel file so whenever I go into it it creates
a new saved file with a dated reference, so I have a full audit trail (i.e.
historical log) in date order automatically.
--
David

U¿ytkownik "David" napisa³ w wiadomo¶ci
...
I'm working on a large spreadsheet which lets say is work in progress and
therefore I have to resave it each time it is updated under a different
name
to distinguish between each saved copy.

Is it possible to set up the Excel file so whenever I go into it it
creates
a new saved file with a dated reference, so I have a full audit trail
(i.e.
historical log) in date order automatically.
--
David

try
Private Sub Workbook_BeforeClose(Cancel As Boolean)
With ActiveWorkbook
.Save
filepath = .Path
.SaveAs filepath & "\your name " & Date & ".xls"
.Close
End With
End Sub
mcg

Excuse my ignorance but where do I type what you have written. What is
Private Sub Workbook.

I'm obviously not very proficient in Excel so please walk me through it.

Thanks
--
David


"Gazeta" wrote:


U¿ytkownik "David" napisa³ w wiadomo¶ci
...
I'm working on a large spreadsheet which lets say is work in progress and
therefore I have to resave it each time it is updated under a different
name
to distinguish between each saved copy.

Is it possible to set up the Excel file so whenever I go into it it
creates
a new saved file with a dated reference, so I have a full audit trail
(i.e.
historical log) in date order automatically.
--
David

try
Private Sub Workbook_BeforeClose(Cancel As Boolean)
With ActiveWorkbook
.Save
filepath = .Path
.SaveAs filepath & "\your name " & Date & ".xls"
.Close
End With
End Sub
mcg

U¿ytkownik "David" napisa³ w wiadomo¶ci
...
Excuse my ignorance but where do I type what you have written. What is
Private Sub Workbook.

I'm obviously not very proficient in Excel so please walk me through it.

Thanks
--
David


"Gazeta" wrote:


U?ytkownik "David" napisa3 w
wiadomo?ci
...
I'm working on a large spreadsheet which lets say is work in progress
and
therefore I have to resave it each time it is updated under a
different
name
to distinguish between each saved copy.

Is it possible to set up the Excel file so whenever I go into it it
creates
a new saved file with a dated reference, so I have a full audit trail
(i.e.
historical log) in date order automatically.
--
David

try
Private Sub Workbook_BeforeClose(Cancel As Boolean)
With ActiveWorkbook
.Save
filepath = .Path
.SaveAs filepath & "\your name " & Date & ".xls"
.Close
End With
End Sub
mcg





right click on sheets tab an choose show code
than find in left window ThisWorkbook an double click it
than to right window paste

Private Sub Workbook_BeforeClose(Cancel As Boolean)
With ActiveWorkbook
.Save
filepath = .Path
.SaveAs filepath & "\your name " & Date & ".xls"
.Close
End With
End Sub

than press alt+f11 and save your file
on closing it copy of the file will be saved as well with data stamp
change "your name" to desired one
mcg
if still help needed - write
mcg

I am the author of a product called TrackUment (www.trackument.com) which solves the problem you have. After installing it, right click on your spreadsheet in Windows Explorer and select "TrackUment-Save Version" from the popup menu. Enter a comment and your version is saved.

You dont' have to create a copy of your spreadsheet each time it is updated, thereby saving you time and effort and keeping your folders uncluttered.

You can quickly get a list of previous versions of your spreadsheet, again, by just right clicking on the file and selecting an option from the popup menu.