Calcul du nombre de lignes

[lola]

Bonjour,

Sur un fichier de base de donnée sur excel j'ai surligner les lignes d'une couleur rouge pour certain et d'une couleur verte pour d'autres et je voudrais savoir comment on peut calculer le nombre de lignes rouges et le nombre de lignes vertes ?

Cordialement

 

[Lone-wolf]

Re : Calcul du nombre de lignes

Bonsoir lola,

hum...hum!

AVIS DE RECHERCHE

A tous les XLDIENS! Le fichier de lola à disparu!!
Celui qui le retrouve, est gentiment prié de le remettre dans le message de lola.

Merci de votre compréhension.

Pas sérieuse de tout ma réponse...


A+

 

[R@chid]

Re : Calcul du nombre de lignes

Bonsoir lola,
Bonsoir Lone-wolf et bienvenu parmi les accros (Bravo pour ce passage, j’espère être le 1er qui te félicite )

@ lola,
Si tu as surligné ces lignes avec des conditions, autrement dit par Mfc, on peut le faire par formule, si non il faut une solution VBA...
pour avoir une solution précise, un fichier exemple sera le bienvenu...

@ +

 

[lola]

Re : Calcul du nombre de lignes

En voici un exemple.

Cordialement

 

[R@chid]

Re : Calcul du nombre de lignes

Bonsoir lola,
Une proposition à l'aide d'une Macro XL4...
Une solution VBA est plus élégante, une âme charitable va surement passer par là pour t'aider...
@ +

 

[lola]

Re : Calcul du nombre de lignes

Merci pour votre réponse c'est pas mal mais pourquoi vous avez mis le 3 dans la formule ?

Cordialement

 

[R@chid]

Re : Calcul du nombre de lignes

Bonsoir,
CouleurCellule ===> renvoie le 3 comme code de la couleur Rouge dans l'index et 4 pour la couleur verte
Alors dans NB.SI() en compte les nombre de 3 et 4 dans la colonne jaune...
@ +

 

[ROGER2327]

Re : Calcul du nombre de lignes

Bonsoir lola, R@chid.

Avec une petite fonction personnalisée :​

Function couleur(plg As Range)
Application.Volatile
Dim i&
ReDim c(1 To plg.Count, 0)
    For i = 1 To plg.Count: c(i, 0) = plg(i).Interior.ColorIndex: Next
    couleur = c
End Function

Voir l'utilisation dans le classeur joint.​

ROGER2327
#6358

Dimanche 8 Décervelage 140 (Saint Bordue, Capitaine - fête Suprême Tierce)
16 Nivôse An CCXXI, 9,6339h - silex
2013-W01-6T23:07:17Z

 

[Lone-wolf]

Re : Calcul du nombre de lignes

Bonjour R@chid, Roger

@ R@chid: merci pour le compliment.


A+

 

[lola]

Re : Calcul du nombre de lignes

Bonjour,

Je vous remercie pour vos réponses mais je n'ai toujours pas compris pourquoi le 3 pour rouge, le 4 pour vert de plus je n'ai pas de jaune dans mon fichier et la fonction index je sais pas où elle est.

Cordialement

 

[xhudi69]

Re : Calcul du nombre de lignes

bonjour le Forum et lola,
Bonjour Lone-wolf et bravo pour ton passage
Bonjour R@chid
Bonjour ROGER2327

@ lola: voir le petit fichier en PJ ou tu auras les codes couleur pour Excel.

@+

 

[ROGER2327]

Re : Calcul du nombre de lignes

Bonjour à tous.

Méfions-nous de la propriété ColorIndex !
Une même valeur de cette propriété peut correspondre à de nombreuses couleurs différentes.
Ces couleurs peuvent varier en fonction du choix de palette de chaque utilisateur.
Plus sûre est l'utilisation de la propriété Color.​

ROGER2327
#6359

Lundi 9 Décervelage 140 (Dormition de Jacques Vaché, Interprète - fête Suprême Quarte)
17 Nivôse An CCXXI, 6,7428h - marne
2013-W01-7T16:10:58Z

 

[xhudi69]

Re : Calcul du nombre de lignes

Re bonjour ROGER2327, le Forum,

J'admire tes interventions, toujours très justes, merci pour cet Excellent fichier: à conserver.

Merci de nous faire progresser.

@+

 

[lola]

Re : Calcul du nombre de lignes

Bonsoir,

Pouvez-vous m'envoyer le fichier sous le format 2003 si vous pouvez, car je ne peux pas le lire.

Cordialement

 

[xhudi69]

Re : Calcul du nombre de lignes

Bonsoir lola, le Forum,

Et voilà !

@+