photonicman
New Member
- Joined
- Nov 7, 2007
- Messages
- 20
I want to have the macro delete the color applied once a new "Row" is selected!
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim RR As Range
Set RR = Target
Cells(RR.Row, 2).Interior.ColorIndex = 36
Cells(RR.Row, 3).Interior.ColorIndex = 36
Cells(RR.Row, 4).Interior.ColorIndex = 36
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim RR As Range
Set RR = Target
Cells(RR.Row, 2).Interior.ColorIndex = 36
Cells(RR.Row, 3).Interior.ColorIndex = 36
Cells(RR.Row, 4).Interior.ColorIndex = 36
End Sub
Last edited: