Changing Background Color for Active Cells, then back to Previous Color...

Good Afternoon,

I would like to be able to change the background colors of all cells from white to blue, while still being able to have the active cell show up as yellow. I need some help here...everything seems to end up back with the white background (except for the active cell being yellow). Below is the code I am using:

Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Range("A1:Z50"), Range(Target(1).Address)) _
Is Nothing Then Exit Sub
Cells.Interior.ColorIndex = xlNone
ActiveCell.Interior.Color = vbYellow
End Sub

Any help here would be greatly appreciated! Many thanks in advance...


TMCinDC