Hücre renklendirme

[haso_excel]

Merhaba arkadaşlar,
Aşağıdaki kod ile kolon ve satırlar renkleniyor. Peki Kolon ile satırların rengi aynı kalmak şartı ile hangi hücrenin üzerine gidersem gideyim o hücrenin de rengini değiştirmek mümkün mü ?

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

 

[haso_excel]

Bir soru daha,
Bu ilgili kodu hangi sheet de kullanacaksam onun içine kopyalayıp kullanıyorum. Her ihtiyaç duyduğumda kullanmak üzere, bunu Personal.xls in içindeki bir module koyup exel toollbar lardan birine custom buttona atasam kullanabilir miyim