j'ai trouvé ça ?
Compter le nombre de cellules dont le fond est coloré en bleu (rouge, vert, etc.)
* Lancez l'éditeur VBA (menu "Outils/ macros/ Visual Basic Editor") ou par ALT + F11
* CRTL + R pour accéder à VBA project en haut à gauche
* Là double cliquez sur THISWORKBOOK
* Placez (copiez/collez) la macro ci-dessous :
Sub NombredeCellulesbleues()
Dim Cellule As Range
Dim total As Variant
For Each Cellule In Selection
If Cellule.Interior.ColorIndex = 5 Then 'bleu
total = total + Cellule.Count
End If
Next
MsgBox "Il y a " & total & " Cellules bleues"
Range("A1") = total
End Sub
pensez vous etre la meilleure solution ?
-- Mer Mar 17, 2010 7:43 am --
Bon en fait ok ça me comptabilise et m'indique le nombre de cellules de couleur (6 pour jaune ok)
mais il faudrait trouver le moyen de l'inscrire dans une cellule !