Change color of active cells

G

Gary''s Student

Put the following in Worksheet code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Selection.Interior.ColorIndex = 6
End Sub


REMEMBER; Worksheet code, not a standard module.
 
Top