Dans cet article, vous apprendrez comment obtenir la couleur de la cellule à l’aide du code VBA.

Nous devons suivre les étapes ci-dessous pour lancer l’éditeur VB.

Cliquez sur l’onglet Développeur Dans le groupe Code, sélectionnez Visual Basic

img1

Cliquez sur Insérer, puis sur Module

img2

Cela créera un nouveau module.

Entrez le code suivant dans le module

Fonction ColorIndex (CellColor As Range)

ColorIndex = CellColor.Interior.ColorIndex

Fonction de fin

img3

Pour obtenir la couleur des cellules ci-dessous, reportez-vous à l’instantané ci-dessous

img4

Dans la cellule B2, entrez la formule comme = ColorIndex (A2), puis copiez la formule dans les cellules ci-dessous.

img5

[.underline] # Prenons un autre exemple: # Pour savoir combien de fois une couleur particulière s’est répétée (comptez par couleur), reportez-vous ci-dessous à l’instantané

img6

Nous pouvons utiliser la fonction COUNTIF avec la fonction UDFColorIndex nouvellement créée.

===

COUNTIF: compte le nombre de cellules dans une plage qui remplit la condition.

Syntaxe: = COUNTIF (plage, critères)

range: il fait référence à la plage de cellules sélectionnées à partir de laquelle les critères vérifieront le nombre d’éléments trouvés.

critères: les critères définissent les cellules à compter.

Dans la cellule D2, la formule serait = COUNTIF ($ B $ 2: $ B $ 9, ColorIndex (D2))

img7

En copiant la formule dans la cellule E2, nous obtiendrons le décompte par couleurs.

img8

C’est ainsi que nous pouvons obtenir la couleur de n’importe quelle cellule.