[EXCEL-FORMULE] Calcul NB de VAL spécifique
Doudou95
Messages postés
1897
Statut
Membre
-
Doudou95 Messages postés 1897 Statut Membre -
Doudou95 Messages postés 1897 Statut Membre -
Bonjour,
Je souhaite calculer dans une colonne le nombre de case verte sachant que chaque cellule de cette colonne est soumise à une Mise en forme conditionnelle pourriez vous m'aider à trouver cette formule.
Je pense qu'il faut utiliser NB.SI(;)
On aurait alors NB.SI(O7:O807;?) ce que je cherche c'est ce qu'il y a à la place du ? et qui contient donc la propriété couleur verte
Chaque date peut être modifiée par une date plus récente il n'y a pas de date limite de début ni de fin.
La cellule est colorée Vert, Orange ou Rouge selon la validité de la date.
Pouvez vous m'aider :'( ?
Je souhaite calculer dans une colonne le nombre de case verte sachant que chaque cellule de cette colonne est soumise à une Mise en forme conditionnelle pourriez vous m'aider à trouver cette formule.
Je pense qu'il faut utiliser NB.SI(;)
On aurait alors NB.SI(O7:O807;?) ce que je cherche c'est ce qu'il y a à la place du ? et qui contient donc la propriété couleur verte
Chaque date peut être modifiée par une date plus récente il n'y a pas de date limite de début ni de fin.
La cellule est colorée Vert, Orange ou Rouge selon la validité de la date.
Pouvez vous m'aider :'( ?
A voir également:
- [EXCEL-FORMULE] Calcul NB de VAL spécifique
- Formule excel si et - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Liste déroulante excel - Guide
- Formule somme excel ligne - Guide
- Excel mise en forme conditionnelle formule - Guide
6 réponses
Bonjour,
Je crois pas que ce soit possible par les formules excel directement.
Ce que tu peux faire mais je pense que tu y as déjà pensé, c'est réutilisé les conditions de la mise en forme conditionnelle pour compter tes cellules.
Après tu peux passer par un petit code vba qui en fonction de la couleur de ta cellule incrémente un compteur.
Fais moi savoir tu as besoin d'aide sur le code vb.
Biloue
Je crois pas que ce soit possible par les formules excel directement.
Ce que tu peux faire mais je pense que tu y as déjà pensé, c'est réutilisé les conditions de la mise en forme conditionnelle pour compter tes cellules.
Après tu peux passer par un petit code vba qui en fonction de la couleur de ta cellule incrémente un compteur.
Fais moi savoir tu as besoin d'aide sur le code vb.
Biloue
Ajouter une macro implique créer un bouton je ne désire pas de boutons. . . je peux passer par une feuille supplémentaire que je cache ou je mets une condition ou j'obtiens 1 quand la date est valide (donc quand la case est verte) et je compte les 1 mais j'aimerai faire plus propre...
Au pire si j'ai pas le choix mon tableaux de synthèse sera vide et je ferai par VB pour le remplir mais je n'ai pas qu'une colonne à faire et si je passe par VB ce sera interminable . . .
Au pire si j'ai pas le choix mon tableaux de synthèse sera vide et je ferai par VB pour le remplir mais je n'ai pas qu'une colonne à faire et si je passe par VB ce sera interminable . . .
Function Farbig(CL As Range) As Long
If CL.Interior.ColorIndex = ? Then ....
End Function
a la place de ? tu mets le code couleur souhaité et la place de .... tu mets ta fonction
tu voulais le nombre de case je crois alors t'as juste a incrémenter une valeur ;)
If CL.Interior.ColorIndex = ? Then ....
End Function
a la place de ? tu mets le code couleur souhaité et la place de .... tu mets ta fonction
tu voulais le nombre de case je crois alors t'as juste a incrémenter une valeur ;)
oki j'testerai ça tout à l'heure en attendant tu peux tester voir si t'arrive à trouver la fonction avec l'aide excel c'est ce que je fais mais j'avoue tourner en rond je continue à chercher aidez moi compagnons :D
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Bonjour,
moi je fais comme ça...
Sub test()
Sheets("feuil1").Select
x = NbCelluleCouleur(Range("C6:d25"), 6)
End Sub
sur la feuille =NbCelluleCouleur(C6:D30;6)
6 c'est jaune
la fonction.
Function NbCelluleCouleur(Cel As Range, Coul As Long) As Long
Dim c As Variant
For Each c In Cel
If c.Interior.ColorIndex = Coul Then
i = i + 1
End If
Next
NbCelluleCouleur = i
End Function
moi je fais comme ça...
Sub test()
Sheets("feuil1").Select
x = NbCelluleCouleur(Range("C6:d25"), 6)
End Sub
sur la feuille =NbCelluleCouleur(C6:D30;6)
6 c'est jaune
la fonction.
Function NbCelluleCouleur(Cel As Range, Coul As Long) As Long
Dim c As Variant
For Each c In Cel
If c.Interior.ColorIndex = Coul Then
i = i + 1
End If
Next
NbCelluleCouleur = i
End Function
