Visual Basic - color en fila flexgrid

Me hace falta que cuando pinche en una fila del flexgrid esta cambie de color, y que cuando pinche en otra esta se cambie tambien de color y la otra vuelva a su color original

muy sencillo:
esta dos funciones espero que te sirvan
Function Poner_Color(Flex As MSHFlexGrid, Ren As Double, Color As Variant)
Dim LnCol As Double
With Flex
.Row = Ren
For LnCol = 1 To .Cols - 1
.Col = LnCol
.CellBackColor = Color
Next
End With
End Function

Public Sub Quitar_Color(Flex As MSHFlexGrid, Ren As Double, Color As Variant)
Dim LnCol As Double
With Flex
.Row = Ren
For LnCol = 1 To .Cols - 1
.Col = LnCol
.CellBackColor = Color
Next
End With
End Sub