Aktif satırı renklendirme ve bir satırı hariç bırakma

[ommerk]

Merhaba,
Aktif hücrenin bulunduğu satırı vba kodunu bularak renklendirdim.
Tıkladığım hücresin satırını renklendiriyor.
Fakat benim istediğim 1 ve 2. satırı hariç bırakmak
1 ve 2. satırda herhangi bir yere tıkladığımda ordaki renklendirmem bozulmasın.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Cells.Interior.ColorIndex = xlColorIndexNone
ActiveCell.EntireRow.Interior.ColorIndex = 17 ' Satır Rengi
End Sub

 

[askm]

Aşağıdaki şekilde deneyin.

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
If Target.Row > 2 Then
    Cells.Interior.ColorIndex = xlColorIndexNone
    ActiveCell.EntireRow.Interior.ColorIndex = 17 ' Satır Rengi
End If
End Sub