Excel VBA highlight cell in specific column when value is changed

[BKPE]

Hi,

How to adjust below code in order to highlight a cell (only in specific columns) when value is changed?

Private Sub WorkSheet_Change(ByVal Target As Range)
If Target.Value <> "" Then
Target.Interior.ColorIndex = 36
End If
End Sub

Thanks.

 

[EXCEL MAX]

Hello BKPE,
choose columns by column index...

Private Sub WorkSheet_Change(ByVal Target As Range)

    Dim vSomeColumn As Integer, vSomeColumn2 As Integer

    vSomeColumn = 3
    vSomeColumn2 = 5
    If Target.Value <> "" And _
       Target.Column >= vSomeColumn And _
       Target.Column <= vSomeColumn2 Then
       Target.Interior.ColorIndex = 36
    End If
    
End Sub

 

[Fluff]

Hi & welcome to MrExcel.
Another option

Private Sub Worksheet_Change(ByVal Target As Range)
   If Target.CountLarge > 1 Then Exit Sub
   If Not Intersect(Target, Range("A:A,C:C,H:H")) Is Nothing Then
      If Target <> "" Then Target.Interior.ColorIndex = 36
   End If
End Sub

Change columns to suit.

 

[BKPE]

Hi EXCEL MAX and Fluff,

Both options worked perfect!

Thanks a lot.

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[EXCEL MAX]

It's good to have more options. Thanks.