View Single Post
  #3   Report Post  
FSt1
 
Posts: n/a
Default

hi,
add this to your workbook
Add a sheet then hide it. in the code below, change sheet2 to your hidden
sheet.
any time someone saves the file, this cod will run.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("sheet2").Range("A1") = Now()
Sheets("sheet2").Range("A1").Copy
Sheets("sheet2").Range("A1").PasteSpecial xlPasteValues
Sheets("sheet2").Range("A2").Value = Application.UserName
End Sub

regards
FSt1


"SirSimons" wrote:

I need a funktion in my excel sheet, that indicate the person who have saved
a file the last time - Like the NOW() formula, I look for a formula that link
to LastSavedBy