Discussion :

[paspillon]

Bonjour,

Je galère un peu sur un élément qui me paraissait simple, mais..

En VBA, je souhaiterai compter le nombre de cellule, dans une colonne, qui ont des feux feu ou rouge ou jaune.
Les cellules répondent à une "Mise en forme conditionnelle".
(IconSets(xl3TrafficLights2).Item(1)).

Merci d'avance pour votre aide.

Cordialement.

Pascal

[Algoplus]

Bonjour,

peut-être en s'inspirant du travail de Jacques BOISGONTIER à ce sujet :
http://boisgontierjacques.free.fr/pa....htm#comptemfc

A+

[halaster08]

Bonjour,

L'utilisation des couleurs, notamment celle provenant des MFC, comme critère est parfois problématique et/ou source d'erreur, il est plus simple de réutiliser les critères de la MFC que les couleurs.

[paspillon]

Bonjour,

Merci pour vos messages.

J'ai suivi le conseil de Algoplus, mais le travail de Jacques BOISGONTIER n'a pas marché sur mes "trafficlight".

A+

[paspillon]

Bonjour,

Je suis toujours bloqué !!!

J'ai essayé ceci, mais ça ne marche pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nbr_de_feu_jaune = Range("I2:I20").IconSets(xl3TrafficLights2).Item(2).Count

Cdlt.
Pascal P.

[Philippe Tulliez]

Bonjour,
Pourquoi n'effectues tu pas ton calcul en fonction des critères de la mise en forme conditionnelle.
Ainsi, j'utilise les icônes TrafficLights pour visualiser si un dossier n'est pas encore commencé (rouge), en cours (jaune et terminé (vert). La mise en forme réagit donc avec 0, 1 et 2
Je peux donc compter le nombre de dossier par statut à l'aide de la fonction NB.SI
Exemple pour compter les verts

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=NB.SI($F$2:$F$5;2)

Si tu as des situations plus complexes à dénombrer, il y a bien entendu d'autres fonctions à ta disposition comme SOMMEPROD, NB.SI.ENS, etc.