Track last username in a column if cells within a range were modified/changed

[taostep1]

Hi All,

I've been spinning my wheels on this and couldn't find any useful sources to help me with the following.

I have a spreadsheet that is shared among of group of people and there are always mistakes that happen within the file. Thus, I want to identify who the last end user was, who made a change to a row. I would like that to be in column K. Unfortunately, I can't use a vba macro event to prepopulate this detail, otherwise my undo stack will get erased.

Case: I have a range between A1:J500 and would like to use a similar formula below to capture the last end user who made a change to any of those rows within the range.

Any help would be great.

<code style="margin: 0px; padding: 0px; border: 0px; font-style: inherit; font-variant: inherit; font-weight: inherit; font-stretch: inherit; line-height: inherit; font-family: Consolas, Menlo, Monaco, "Lucida Console", "Liberation Mono", "DejaVu Sans Mono", "Bitstream Vera Sans Mono", "Courier New", monospace, sans-serif; vertical-align: baseline; box-sizing: inherit; white-space: inherit;">Public Function UserName()
UserName = Environ$("UserName")
End Function</code>

 

[Kamolga]

I only see VBA to answer your question but instead of value change event and losing undo, you can for example save column k on a sheet when opening the workbook

Private Sub Workbook_Open()


End Sub

and compare it with the new column k before closing

Private Sub Workbook_BeforeClose(Cancel As Boolean)


End Sub

or before save

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)


End Sub

For each cell that is deferent, write then the values in a log sheet (or an array in VBA) with the name of the user