Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Comptage nb de cellules rouge ?

2 réponses
Avatar
ad57 sur Free
Bonjour,

Je recherche une méthode pour compter le nombre de cellule de couleur rouge
dans un tableau.

Merci pour l'aide

Alain

2 réponses

Avatar
garnote
Salut Alain,

Essaie ceci :

Sub Je_Vois_Rouge()
For Each c In Selection
If c.Interior.ColorIndex = 3 Then k = k + 1
Next
MsgBox k & " rouge(s)."
End Sub

Serge

"ad57 sur Free" a écrit dans le message de news:
40379b57$0$22393$
Bonjour,

Je recherche une méthode pour compter le nombre de cellule de couleur
rouge

dans un tableau.

Merci pour l'aide

Alain




Avatar
ad57
Merci,
Cela fonctionne bien.

"garnote" a écrit dans le message de news:
U4NZb.62971$
Salut Alain,

Essaie ceci :

Sub Je_Vois_Rouge()
For Each c In Selection
If c.Interior.ColorIndex = 3 Then k = k + 1
Next
MsgBox k & " rouge(s)."
End Sub

Serge

"ad57 sur Free" a écrit dans le message de news:
40379b57$0$22393$
Bonjour,

Je recherche une méthode pour compter le nombre de cellule de couleur
rouge

dans un tableau.

Merci pour l'aide

Alain