Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Vba - Trouver le colorIndex défini par une M.F.C.

  • Initiateur de la discussion Initiateur de la discussion Troudz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Troudz

XLDnaute Occasionnel
Bonjour tout le monde,

Je viens de réaliser une boucle simple qui compte le nombre de cellules à fond rouge sur une feuille de classeur.
Mon soucis est que, lorsque la couleur de fond de la cellule est définie par une mise en forme conditionnelle, son ColorIndex n'est pas modifié en conséquence et garde donc sa valeur par défaut (-4142).

Comment pourrais je contourner ce problème ?

Je vous remercie par avance de votre aide.

Bonne journée
 
Re : Vba - Trouver le colorIndex défini par une M.F.C.

Bonjour Troudz, bonjour le forum,

Avec les MFC il ne faut pas que tu utilises la couleur mais la condition qui a généré cette couleur... Par exemple si ta MFC colore de rouge la cellule dont le résultat est >10, il faudra faire :
Code:
For Each Cel In Range("A1:A10")
If cel.Value > 10 Then compteur = compteur +1
 
Re : Vba - Trouver le colorIndex défini par une M.F.C.

Bonjour Robert et merci pour ta réponse,

Mon soucis est que les conditions de ma MFC sont beaucoup plus complexes que ça. Elles ne dépendent pas d'une valeur mais du résultat d'une formule personnalisée (avec tout un tas d'arguments qui diffèrent d'une cellule à l'autre).
Pour une question de maintenance de mon code Vba, j'aurai donc voulu compter "simplement" le nombre de cellules rouges sur mes feuilles.
 
Re : Vba - Trouver le colorIndex défini par une M.F.C.

Bonjour Troudz, bonjour le forum,

C'est, à ma connaissance, le seul moyen. Il te faudra trouver une parade du style rajouter "1" via la MFC dans une colonne (cachée ?) pour pouvoir comptabiliser...

[Édition]
Bonjour Gilbert on s'est croisé...
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

M
Réponses
2
Affichages
7 K
Magicdog36
M
T
Réponses
0
Affichages
1 K
TimtExcel
T
L
Réponses
4
Affichages
806
Lindsay_RBD
L
M
Réponses
6
Affichages
1 K
Margaux1301
M
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…