Discussion :

[nanot]

Bonjour à tous,

J'ai un petit problème pour la réalisation d'une macro.

J'ai en fait une colonne A avec des couleurs différentes (trois au total : vert, jaune, bleu).

Je voudrais par exemple qu'en C1 je mette la couleur vert par exemple et qu'en cellule D1, il me compte le nombre de cellule en vert dans la colonne A.

Pour la couleur jaune, même procédure que précédemment sauf que la couleur jaune sera placé en C2 et le comptage de cette couleur soit en D2.

Pour la couleur bleu, même procédure que dans le premier cas sauf que la couleur bleu sera placé en C3 et le comptage de cette couleur soit en C3.


Merci d'avance pour votre aide.

[mayekeul]

bonjour,

tu place ce code dans un module
et dans la feuille tu fait appel a la fonction
rngsrc représente la plage à tester
et rngcolor représente la cellule de test

Code :

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

1
2
3
4
5
6
7
8
9
 
function countcolor(rngsrc as range,rngcolor) as integer
for each c in rngsrc
    if c.interior.colorindex= rngcolor.interior.colorindex then
        countcolor=countcolor+1
    end if
next
 
end function

[nanot]

Merci mayekeul pour le code.

J'en avais un autre mais qui était plus long.

Merci encore ça marche nickel.

Code :

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

1
2
3
4
5
6
7
8
9
 
function countcolor(rngsrc as range,rngcolor) as integer
for each c in rngsrc
    if c.interior.colorindex= rngcolor.interior.colorindex then
        countcolor=countcolor+1
    end if
next
 
end function

[/QUOTE]