ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Undo change (https://www.excelbanter.com/excel-programming/296242-undo-change.html)

Bhuktar S[_5_]

Undo change
 
Can anyone help to let me know how do to allow user to undo the chang
in a cell which has been conditioned through VBA?
For example, as in below, after the user changes the value in cel
(2,12), it cannot be undone to make it unchanged. The user needs t
re-enter the old value again.
I do not want to add a macro button for formatting the number.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(2, 12).Value < 100 Then
Cells(2, 12).NumberFormat = """AW10""0"
Else: Cells(2, 12).NumberFormat = """AW1""0"
End If
End Su

--
Message posted from http://www.ExcelForum.com


JE McGimpsey

Undo change
 
Take a look at John Walkenbach's "Undoing a VBA Subroutine":

http://j-walk.com/ss/excel/tips/tip23.htm


In article ,
Bhuktar S wrote:

Can anyone help to let me know how do to allow user to undo the change
in a cell which has been conditioned through VBA?
For example, as in below, after the user changes the value in cell
(2,12), it cannot be undone to make it unchanged. The user needs to
re-enter the old value again.
I do not want to add a macro button for formatting the number.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Cells(2, 12).Value < 100 Then
Cells(2, 12).NumberFormat = """AW10""0"
Else: Cells(2, 12).NumberFormat = """AW1""0"
End If
End Sub


---
Message posted from http://www.ExcelForum.com/



All times are GMT +1. The time now is 12:24 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com