Satır renklendirme

[ormann]

Sayın arkadaşlar ekte göndermiş olduğum dosyamda b9-ı9 ve b39-ı39 hücreleri arasına herhangi bir satırın üzerine geldiğimde o satırın örnekteki rengi almasını istiyorum. Osatırların dışında ise renkli olmasını istemiyorum.yardımcı olurmusunuz.

 

[Necdet]

Merhaba,

Aşağıdaki kodları ilgili sayfanın kod bölümüne kopyalayınız.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, [b9:I39]) Is Nothing Then Exit Sub
Range("B9:I39").Interior.ColorIndex = xlNone
Range("B" & Target.Row & ":I" & Target.Row).Interior.ColorIndex = 35
End Sub

 

[ormann]

hocam çok teşekkür ederim ellerinize sağlık

 

[Erhan Üstünel]

benim bir sorum olucak, aynı zamanda hücrelere dolgu rengi uyguladığımızda dolgu rengi geçersiz oluyor bunu nasıl sağlayabiliriz.