'if column is editable If Cells(Range("EditableMask").Row, Target.Column).Value = "Editable" Then 'if editable then do this 'MAIN CODE GOES HERE - Validate, Highlight the dirty cell, Turn on Save button. Else With Application .EnableEvents = False .Undo .EnableEvents = True End With End If
If the column is not editable then the cell reverts to the previous value.
Optionally, have a message box say “This column is not editable”.
MsgBox "This column is not editable" With Application .EnableEvents = False .Undo .EnableEvents = True End With