Re Ge0ffroy,
Si ça affiche #NOM? c'est que tu n'as pas mis la fonction personnalisée dans un module de ton vrai fichier.
Dans ton fichier il faut que tu ailles sur l'onglet "Développeur" puis dans la fenêtre qui s'ouvre cliquer sur l'onglet "Insertion" puis dans le menu déroulant sélectionner "Module" puis copier ce code:
Function CodeCouleur(CelluleCouleur As Range) As Long
'Retourne le code couleur de la CelluleCouleur
Application.Volatile
CodeCouleur = CelluleCouleur.Font.ColorIndex
End Function
Ensuite tu peux utiliser l'unes des 2 formules fournies précédemment.
Cdlt.