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.

Añade tu respuesta

Haz clic para o