undoing a VB action

  • Thread starter Thread starter RICH
  • Start date Start date
R

RICH

I have the attached code to sheet! Basically it gives me the user name and
date when a value is altered. What I want to do is for the user to be able
to undo the changes they make.

Any ideas?

Thanks in advance!

Rich :o)


Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column <> 15 Then Exit Sub
If Target.Row = 1 Then Exit Sub
If IsEmpty(Target.Offset(0, 9)) Then
Target.Offset(0, 10) = Date
Target.Offset(0, 9) = Application.UserName
End If
End Sub
 
You would need to build your own record of what the sheet was like before
the user started making changes, then provide a means for them to select to
undo - then replace the changes with the original.

Most macros, when run, cause the undo history to be erased and undo does not
record changes made by a macro.
 
Yep agree with what you're saying. The only prob is to do that the file has
to be saved externally. It's a 2MB file so saving is an issue.

Looks like there isn't an alternative!

Thanks anyway!

Rich :o)
 
Back
Top