Aktif Hücre Renklendirme

[csncesur]

İyi günler. Excel'de herhangi bir hücreye tıkladığımda sadece seçili satırı istediğim renge dönüştürülebilir mi ? (mesela Sarı renk = 6) renklendirirken mevcut olan SATIR 1'deki rengi bozmadan.

 

[ÖmerFaruk]

Sayfanızın kod sayfasına (Excel sayfanız açıkken Alt+F11 basabilirsiniz) yapıştırın.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Intersect(Target, Range("A2:T21")) Is Nothing Then Exit Sub
    Range("A2:T21").Interior.Color = xlNone
    Range("A" & Target.Row, "T" & Target.Row).Interior.Color = vbYellow
End Sub

 

[csncesur]

Çok teşekkür ederim elinize sağlık