Totaliser cellules coloriees

Résolu/Fermé
CALI - 14 févr. 2013 à 12:59
 CALI - 15 févr. 2013 à 09:08
Bonjour,

j'ai un tableau avec certaines cellulues coloriées en jaune, d'autres en bleu et d'autres en orange.

Je souhaiterais connaitre le nombre de cellules coloriées (toutes couleurs confondues)

Par avance, merci

5 réponses

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 711
14 févr. 2013 à 22:49
Bonjour,

Les couleurs sont mises manuellement ou par MFC ?

Quelle est ta version excel ?
0
bonjour,

Excel 2007 et les couleurs sont mises manuellement.

Merci
0
Mike-31 Messages postés 18350 Date d'inscription dimanche 17 février 2008 Statut Contributeur Dernière intervention 28 novembre 2024 5 106
15 févr. 2013 à 07:43
Salut,

Pour les couleurs saisies manuellement il faut passer par le VBA, si tu as quelques notions.
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
Modifié par michel_m le 15/02/2013 à 08:59
Bonjour

Sub compter_couleur() 
Dim cellule As Range, Total As Integer 

For Each cellule In Range("B3:E14") ' A ADAPTER
     'Totaliser cellules coloriees 
     If cellule.Interior.ColorIndex <> -4142 Then Total = Total + 1 
Next 

MsgBox Total & " Cellules coloriées" 
End Sub


Michel
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Bonjour et merci.
0