Highlight række

Hejsa,

Har fundet denne i et tidligere opslag.
Den virker fint, men kan den kodes, så den returnerer cellerne med den farve som var der tidligere (før der blev klikket på rækken)?

Dim adr As String
Dim farve

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If adr <> "" Then Rows(adr).Interior.ColorIndex = xlNone
farve = Target.Interior.ColorIndex
Rows(Target.Row).Interior.ColorIndex = 35
adr = Target.Row
End Sub