SheetChange event restore old value

Hello folks,

when the SheetChange event is thrown a cell got change in the grid, and that
cell I can tell by the property of the target variable. Good, but is there a
chance to restore the old value before the editing took place? (like pushing
the red cross buton when entering somtehing manually).


Thanks

Anton

You can use application.undo something like this

Private Sub Worksheet_Change(ByVal Target As Range)
If LCase(Target.Value) = "this" Then Application.Undo
End Sub

If you type in the word this it undoes what was typed back to the previous
value of the cell.
--
HTH...

Jim Thomlinson


"Anton Sommer" wrote:

> Hello folks,
>
> when the SheetChange event is thrown a cell got change in the grid, and that
> cell I can tell by the property of the target variable. Good, but is there a
> chance to restore the old value before the editing took place? (like pushing
> the red cross buton when entering somtehing manually).
>
>
> Thanks
>
> Anton
>
>
>