bulunduğum satırı renkli göstersin

relaxim

Altın Üye
Katılım
30 Ağustos 2009
Mesajlar
587
Excel Vers. ve Dili
LTSC Pro Plus 2024 Türkçe
Altın Üyelik Bitiş Tarihi
15.06.2027
Merhaba.
Ben de bir alternatif vereyim (işlem yapılacak sayfanın kod bölümüne uygulayın).
Belgede renklendirme yoksa (kod işlem öncesi, mevcut renklendirmeleri siler) seçili satır ve sütunun renklenmesi için kullanılabilir.
Kod:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Selection.Count > 1 Then Exit Sub
    Cells.Interior.Color = xlNone
    Range(Cells(1, Target.Column), Cells(Rows.Count, Target.Column)).Interior.ColorIndex = 34
    Range(Cells(Target.Row, 1), Cells(Target.Row, Columns.Count)).Interior.ColorIndex = 34
    Target.Interior.ColorIndex = 36
End Sub
Ömer hocam sadece satırın renklenmesi için kodda nasıl bir düzenleme yapmamız lazım? Saygılar...
 

relaxim

Altın Üye
Katılım
30 Ağustos 2009
Mesajlar
587
Excel Vers. ve Dili
LTSC Pro Plus 2024 Türkçe
Altın Üyelik Bitiş Tarihi
15.06.2027
Ömer hocam sadece satırın renklenmesi için kodda nasıl bir düzenleme yapmamız lazım? Saygılar...
Column yazan satırı kaldırdım oldu. Renkleri de ayarlayabiliyorum teşekkürler....
 
Üst