La función personalizada que estás incorporando a tu libro se llama:
PromedioColor
Verifica dos cosas:
a) Que la fórmula que estés usando sea:
= PromedioColor(A2:A50; A2)
b) Que el código incorporado comience con:
Function PromedioColor
Saludos, Cacho.