Função para trazer um resultado a partir da cor da fonte

Como faço para criar uma função para trazer um resultado a partir da cor da fonte. ex: se a fonte for “verde” a resposta é “OK”

Use o VBA.
IF range(“A1”).interior color = VBgreen then
msgbox “Ok”
else end if

Algo como isso.