¿Cómo puedo cambiar el color de una celda sólo clickando en ella?

Hola, un saludo.
¿Quisiera saber si alguna forma de asignar una macro a un simple click del ratón sobre una celda concreta y que se le pueda cambiar automáticamente su color o cualquier otra acción?

… “$E$5” es la celda deseada.

'================================================ \
Sub ContenidoAlterado (oCelula)
'================================================ /
Añada el siguiente al evento Selección de cambios de los eventos de hoja de cálculo:
'Menú de hoja de cálculo> Eventos de hoja de cálculo ... o
'Abre de la hoja de cálculo (botón derecho del ratón)> Eventos de hoja de cálculo ...
Observe que estos son eventos específicos de cada hoja de cálculo y
no aparecen en Herramientas> Personalizar> Eventos.
'Por Grafeno:' https://ask.libreoffice.org/t/como-executar-uma-macro-no-calc-ao-selecionar-em-uma-celula/20612
'================================================
     Pruebe si el objeto seleccionado es una celda individual
     If oCelula.ImplementationName <> "ScCellObj" Then Exit Sub
     If Right (oCelula.AbsoluteName, 4) = "$E$5" Then
         'Llamar la macro deseada

         Call Macro1 '<===== Macro1 = Macro que se ejecuta

     End If
End Sub