I have the set marco below.
However, when I protect my sheet, it can't work. Any way I can resolve the problem?
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
' Only look at single cell changes
If Target.Count > 1 Then Exit Sub
Set rng = Range("L:L")
' Only look at that range
Select Case LCase(Target)
Case "pre-cancel", "cancel", "decline"
Target.Offset(, 1) = Date
Case "pending", "expire", "pre-expire", "funded"
Target.Offset(, 1) = ""
End Select
End Sub
However, when I protect my sheet, it can't work. Any way I can resolve the problem?
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
' Only look at single cell changes
If Target.Count > 1 Then Exit Sub
Set rng = Range("L:L")
' Only look at that range
Select Case LCase(Target)
Case "pre-cancel", "cancel", "decline"
Target.Offset(, 1) = Date
Case "pending", "expire", "pre-expire", "funded"
Target.Offset(, 1) = ""
End Select
End Sub