[Excel] compter des cellules en couleur

hello ici le poisson cake du mercantour j'aimerai converser avec vous sur cela avec vous car vous sembez droles. xoxo gossip zboub

Bonjour

A mon avis il faut faire une macro du genre :

Sub compter()
Dim compteur
Dim lig=0 <--déclaration de tes varaiables
Dim col=0

For lig = 1 To 1000 <-- les numéros de ligne de ton tableau
For col = 1 To 1000 <-- les numéros de colonne de ton tableau
If cells(lig,col).interior.colorindex<>0 Then <-- si la couleur de remplissage est différente de blanc
compteur=compteur+1
End If
Next col
Next lig

Range("D24" ).Value = compteur <-- mettre à la place de D24 le numéro de la case qui doit afficher le résultat

End Sub

Je n'ai pas testé cette macro, mais j'espère que ca t'aidera

--Comalies2002--

bonjour
regarde ici
http://bvrve.club.fr/Astuces_Michel/05excelvba.php