relaxim
Altın Üye
- Katılım
- 30 Ağustos 2009
- Mesajlar
- 532
- Excel Vers. ve Dili
- Ofis 2016 Tr 64 bit
- 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...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