View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.worksheet.functions
DCE DCE is offline
external usenet poster
 
Posts: 5
Default change formula in a shared worksheet without losing change his

Hi Noodnutt,

I understand your suggestion to do multiple savings with time extension
conceptually because that's what I have been doing in a very manual way, but
I cannot follow the "program" ( ??) you wrote that I believe is intended to
automate capture of all changes from start to current file?? How do I
integrate that into my worksheet?

Thank you very much for your time. - DCE

"NoodNutt" wrote:

G'day

I would be inclined to remove the Save button from the menu bar/ribbon and
replace it with a Save cmdbtn using code to save to a specific location and
file extension.

You could have multiple saving of the same file, saved with a time
extension, this way each time the file is saved, you can track the
differences between each sheet.

Try this, it should do the trick (not tested)

Dim Sourcewb As Workbook
Dim TempFilePath As String
Dim TempFileName As String
Set Sourcewb = ActiveWorkbook TempFilePath =
C:\Where-Ever-You-Want-It TempFileName = Sourcewb.Name & " " &
Format(Now, "dd-mmm-yy h-mm-ss") With Destwb
.SaveAs TempFilePath & TempFileName
On Error Resume Next
On Error GoTo 0
.Close SaveChanges:=False
End WithHTHRegardsMark.