Evento Click en excel para cambiar color celda o rango
Necesito de quien me pueda colaborar con la siguiente macro.
Tengo un rango de celdas en donde estoy cambiando el color al hacer click, pero lo que quiero es que al momento de presionar nuevamente click en celda diferente ( dentro del rango) esta cambie de color y la anterior quede sin color, este es el código que estoy utilizando:
Private Sub WorKsheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("J4:N8")) Is Nothing Then
Target.Interior.ColorIndex = 8
End If
End Sub
Estoy realizando como un tipo de agenda y quiero resaltar la fecha en un calendario echo en celdas.