bahsettiğiniz talebinize yönelik olarak;
Cells.Interior.ColorIndex = xlColorIndexNone
'ActiveCell.EntireColumn.Interior.ColorIndex = 19 'Sütun Rengi
ActiveCell.EntireRow.Interior.ColorIndex = 16 ' Satır Rengi
ActiveCell.Cells.Interior.ColorIndex = 4 ' Hücre Rengi
kod sayfasına geçiniz (ALT +F11) ve yukarıdaki kodları ThisWorkbook adlı uygulama genel sayfasındaki WORKSHEET - SELECTIONCHANGE olay yordamı içerisine ekleyip kaydediniz ve bu şekilde kullanmayı deneyiniz.
bilginize...iyi çalışmalar,saygılar.