Trucs et astuces techniques

Trouver le code de couleur d’une cellule Excel

Publicités

Tout d’abord ouvrez votre fichier Excel.

Sauvegardez le au format Excel Macros autorisées (.xlsm).

Appuyez sur les touches ALT + F11 pour ouvrir l’éditeur Visual Basic pour Application.

Faites un clic droit sur VBAProject dans la fenêtre de gauche. Puis choisissez Insérer>>Module

Dans le panneau de droite collez le code ci-dessous :

Function CodeCouleur(CelluleCouleur As Range) As Long
'Retourne le code couleur de la CelluleCouleur
Application.Volatile
Codecouleur = CelluleCouleur.Interior.ColorIndex
End Function

Sauvegardez et fermez VBA.

De retour sur Excel Placez les cellules de couleur comme sur la capture d’écran ci-dessus et insérez dans la cellule E3 la formule suivante :

=CodeCouleur(D3)

Définition : CodeCouleur(Cellule à contrôler)

Sauvegardez et fermez votre fichier xlsm et réouvrez le puis autorisez les macros.

Publicités

Publicités