La fonction suivante permet de calculer ce code couleur en VBA:
Function couleur(Cellule As Range)
Application.Volatile
Couleur = Cellule.Interior.ColorIndex
End Function
Il faut copier ce code dans un nouveau module dans l’editeur VBA
Il est possible ensuite de l’utiliser comme n’importe quelle fonction Excel et de l’imbriquer avec d’autres formules classiques, par exemple comme dans le sujet ci-dessous: