Reply to thread

Message: [QUOTE="Mark, post: 7417514"] Hallo to everybody, I am tryng to write few Vba lines to highlight a cell after update. I am using this code, but it doesn't work, either no error message. Can you please help me? Thanks Private Sub Worksheet_Change(ByVal Target As Range) Dim Rng1 As Range Dim Rng2 As Range Set Rng1 = Range("K7:K1500") ' Column("K:K") Set Rng2 = Intersect(Rng1, Target) If Target.Count > 1 Then Exit Sub If Target.Column <> Rng2 Then Exit Sub Columns(Rng2).Interior.ColorIndex = xlNone Target.Interior.ColorIndex = 6 End Sub Regards Mark [/QUOTE]