hücre renklendirme

[haso_excel]

Merhaba arkadaşlar,

Aşağıdaki kodu forum dan buldum. Kod bulunduğu hücrenin satır ve kolonunu renklendiriyor. Peki hangi hücredeysen o hücreyi renklendirmek istesek nasıl yapacağız. Rica etsem yardımcı olabilir misiniz?

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
       'hucre reklendirme
        Cells.Interior.ColorIndex = xlColorIndexNone
        ActiveCell.EntireRow.Interior.ColorIndex = 3
        ActiveCell.EntireColumn.Interior.ColorIndex = 36
End Sub

 

[Emir Hüseyin Çoban]

. . .

İşlem Sonucu:

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Cells.Interior.ColorIndex = xlColorIndexNone
ActiveCell.Interior.ColorIndex = 3
End Sub

. . .

 

[systran]

ActiveCell.Interior.Color = RGB(255, 0, 0) 'Kırmızı RGB kodu

 

[haso_excel]

Teşekkürler işlem tamamdır arkadaşlar. Elinize sağlık

 

[haso_excel]

Merhaba arkadaşlar,
Bu kod sheeet de çalışıyor. Ama ben workbook da ki tüm sheetlerde çalışsın istiyorum. Tüm sheetlere kopyalama yapmadan nasıl düzeltebilirim kodu

 

[systran]

örneği inceleyiniz.