Formule sous condition
sev33130
-
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Gyrus Messages postés 3334 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'aurais besoin de trouver une formule me permettant de calculer le nombre de désistement à condition que le nom indiqué dans mes cellules soit écrit en rouge.
Mais j'ai un problème pour vous joindre mon fichier car ma direction a bloqué le site (donc je vous représente grosomodo le tableau (on supposera que les lignes 1, 3 et 8 soient écrites en rouge)
A B C D
1 Mérignac - Au fil des Saisons GUESQUIERE RESEAU 07/03/15
2 Mérignac - Au fil des Saisons LEBEAU RESEAU 07/03/15
3 Mérignac - Au fil des Saisons RAVALLI RESEAU 07/03/15
4 Mérignac - Au fil des Saisons KUDRA V.Levieuze 09/03/15
5 Mérignac - Au fil des Saisons OLIVIERO I.Cormel 12/03/15
6 Mérignac - Au fil des Saisons BISCEGLIE RESEAU 13/03/1
7 Mérignac - Au fil des Saisons QUETTIER RESEAU 13/03/15
8 Mérignac - Au fil des Saisons ROCHER RESEAU 27/03/1
En vous remerciant de votre aide.
Cordialement.
Sev33130
J'aurais besoin de trouver une formule me permettant de calculer le nombre de désistement à condition que le nom indiqué dans mes cellules soit écrit en rouge.
Mais j'ai un problème pour vous joindre mon fichier car ma direction a bloqué le site (donc je vous représente grosomodo le tableau (on supposera que les lignes 1, 3 et 8 soient écrites en rouge)
A B C D
1 Mérignac - Au fil des Saisons GUESQUIERE RESEAU 07/03/15
2 Mérignac - Au fil des Saisons LEBEAU RESEAU 07/03/15
3 Mérignac - Au fil des Saisons RAVALLI RESEAU 07/03/15
4 Mérignac - Au fil des Saisons KUDRA V.Levieuze 09/03/15
5 Mérignac - Au fil des Saisons OLIVIERO I.Cormel 12/03/15
6 Mérignac - Au fil des Saisons BISCEGLIE RESEAU 13/03/1
7 Mérignac - Au fil des Saisons QUETTIER RESEAU 13/03/15
8 Mérignac - Au fil des Saisons ROCHER RESEAU 27/03/1
En vous remerciant de votre aide.
Cordialement.
Sev33130
A voir également:
- Formule sous condition
- Formule si et - Guide
- Excel cellule couleur si condition texte - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Formule mathématique - Télécharger - Études & Formations
- Formule somme excel colonne - Guide
2 réponses
Bonjour,
Essaie cette macro :
A+
Essaie cette macro :
Sub Comptage_Desistements()
Dim Cel As Range
Dim Cptr As Integer
For Each Cel In Range("A1", Range("A" & Rows.Count).End(xlUp))
If Cel.Font.ColorIndex = 3 Then Cptr = Cptr + 1
Next Cel
MsgBox "Nombre de désistements : " & Cptr
End Sub
A+
Bonjour,
Je te remercie pour ta réponse mais je n'y arrive pas.
D'autant plus que dans mon tableau d'origine, les cellules j'ai bien plus de cellules que ce que j'ai indiqué.
Existe t-il un autre lien que ''cjoint.com'' pour envoyer nos fichiers ?
Je te remercie pour ta réponse mais je n'y arrive pas.
D'autant plus que dans mon tableau d'origine, les cellules j'ai bien plus de cellules que ce que j'ai indiqué.
Existe t-il un autre lien que ''cjoint.com'' pour envoyer nos fichiers ?
Tu ne devrais pas avoir besoin d'envoyer le fichier.
J'ai ajouté des commentaires afin que tu puisses adapter le code.
Si une partie te parait nébuleuse, n'hésites pas à demander des éclaircissements.
A+
J'ai ajouté des commentaires afin que tu puisses adapter le code.
Si une partie te parait nébuleuse, n'hésites pas à demander des éclaircissements.
Sub Comptage_Desistements()
Dim Cel As Range
Dim Cptr As Integer
'On balaye les cellules de la la plage renseignée dans la colonne A
For Each Cel In Range("A1", Range("A" & Rows.Count).End(xlUp))
'Si la police utilisée est de couleur rouge, alors on incrémente un compteur
If Cel.Font.ColorIndex = 3 Then Cptr = Cptr + 1
Next Cel
'On envoie un message pour indiquer le résultat du comptage
MsgBox "Nombre de désistements : " & Cptr
End Sub
A+