Hi Andre,
Or
Code:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'adjust e2 to where your formula is.
Range("E2").Value = range("E2").Value
End Sub
beeyule, if you can describe more particulars of the situation, maybe a simple bit of code could achieve what you want. Such as this code (when in the code module for a worksheet) will enter the date in column A every time a change is made to a cell in a different column. Something similar can be done maybe to suit your requirements?
regards,
Fazza
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim cel As Range
Application.EnableEvents = False
For Each cel In Target
If cel.Column <> 1 Then Cells(cel.Row, 1).Value = Date
Next cel
Set cel = Nothing
Application.EnableEvents = True
End Sub