date stamp for specific text change

[gaztr1x]

Hi, I have the macro below to put a date stamp in a cell ("U") when the text in another cell ("I") is changed. This works fine. However the original cell "I" automatically populates with "open" when a new row is created within the spreadsheet and A date stamp is created at this point. Therefore I would actually like it to only date stamp if the text specifically changes from "open" to "closed". I am not sure how to alter this macro to do that for me. Any help is appreciated. [TABLE="width: 500"]
<tbody>[TR]
[TD]Private Sub Worksheet_Change(ByVal Target As Range)
Dim U As Range, AC As Range, t As Range
Set U = Range("U:U")
Set AC = Range("I:I")
Set t = Target
If Intersect(t, AC) Is Nothing Then Exit Sub
Application.EnableEvents = False
Range("U" & t.Row).Value = Now
Application.EnableEvents = True
End Sub
[/TD]
[/TR]
</tbody>[/TABLE]

 

[Redwolfx]

Try

Private Sub Worksheet_Change(ByVal Target As Range)
Dim U As Range, AC As Range, t As Range

Set U = Range("U:U")
Set AC = Range("I:I")
Set t = Target

If Intersect(t, AC) Is Nothing Then Exit Sub
     Application.EnableEvents = False
     IF Range("A" & t.row).Value = "Cancel" Then
          Range("U" & t.Row).Value = Now
     End If
     Application.EnableEvents = True
End Sub

 

[gaztr1x]

Try

Private Sub Worksheet_Change(ByVal Target As Range)
Dim U As Range, AC As Range, t As Range

Set U = Range("U:U")
Set AC = Range("I:I")
Set t = Target

If Intersect(t, AC) Is Nothing Then Exit Sub
     Application.EnableEvents = False
     IF Range("A" & t.row).Value = "Cancel" Then
          Range("U" & t.Row).Value = Now
     End If
     Application.EnableEvents = True
End Sub

Excellent. Thanks Redwolfx. Works a treat.

 

[Redwolfx]

Glad to help. Thanks for the feedback!