Excel - nombre de case verte
Fermé
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
-
3 déc. 2010 à 14:34
Qhes Messages postés 176 Date d'inscription lundi 29 septembre 2008 Statut Membre Dernière intervention 21 mai 2014 - 16 mai 2011 à 16:36
Qhes Messages postés 176 Date d'inscription lundi 29 septembre 2008 Statut Membre Dernière intervention 21 mai 2014 - 16 mai 2011 à 16:36
A voir également:
- Excel - nombre de case verte
- Liste déroulante excel - Guide
- Formule excel - Guide
- Si et excel - Guide
- Aller à la ligne dans une case excel - Guide
- Mise en forme conditionnelle excel - Guide
10 réponses
UsulArrakis
Messages postés
7405
Date d'inscription
vendredi 28 mars 2003
Statut
Contributeur
Dernière intervention
27 janvier 2022
3 182
3 déc. 2010 à 14:43
3 déc. 2010 à 14:43
salut
oui mais...
quelle version d'excel ?
la couleur vient-elle d'une mise en forme conditionnelle ?
oui mais...
quelle version d'excel ?
la couleur vient-elle d'une mise en forme conditionnelle ?
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
29
3 déc. 2010 à 17:11
3 déc. 2010 à 17:11
je suis sous excel 2007 et ce sont des couleur que je met moi
mais le filtr auto prend en compte mes couleurs
mais le filtr auto prend en compte mes couleurs
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 396
3 déc. 2010 à 17:39
3 déc. 2010 à 17:39
Bonsoir
alors peut être une solution en attendant que notre ami UsulArrakis (bonsoir) vous trouve une macro appropriée:
vous pouvez faire le total de la partie affichée seulement après le filtrage:
dans une cellule au dessus du champ filtré (pour qu'elle reste visible):
=SOUS.TOTAL(9;Colonne à sommer)
cette formule vous donne le total des lignes apparentes, reste plus qu'à filtrer les vertes.
crdlmnt:
alors peut être une solution en attendant que notre ami UsulArrakis (bonsoir) vous trouve une macro appropriée:
vous pouvez faire le total de la partie affichée seulement après le filtrage:
dans une cellule au dessus du champ filtré (pour qu'elle reste visible):
=SOUS.TOTAL(9;Colonne à sommer)
cette formule vous donne le total des lignes apparentes, reste plus qu'à filtrer les vertes.
crdlmnt:
Mike-31
Messages postés
18313
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 avril 2024
5 073
Modifié par Mike-31 le 3/12/2010 à 18:22
Modifié par Mike-31 le 3/12/2010 à 18:22
Salut,
En VBA, plusieurs possibilités, soit en avec une fonction personnalisée ou avec une macro.
Dans tous les cas si on veut compter les cellules d'une couleur précise il faut avoir le code index de la couleurs exemple pour le rouge l'index est le 3
ce code est à associer à un bouton et comptera toutes les cellules de couleur sur la plage A1 à A100.
Sub Test()
For Each o In [A1:A100]
If o.Interior.ColorIndex <> xlNone Then i = i + 1
Next
MsgBox i
End Sub
pour compter les cellules de couleur verte en supposant qu'il s'agit du vert brillant
Sub Test()
For Each o In [A1:A100]
If o.Interior.ColorIndex = 4 Then i = i + 1
Next
MsgBox i
End Sub
Le nombre s'affiche sur une boite de dialogue (msgbox) mais pourrait s'afficher dans une cellule exemple en B1
remplacer
MsgBox i
par
[B1] = i
ou simplement ajouter la ligne
On pourrait également afficher le code couleur dans une liste déroulante ce qui permettrait en un clic avoir le nombre de cellules de la couleur sélectionnée
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
En VBA, plusieurs possibilités, soit en avec une fonction personnalisée ou avec une macro.
Dans tous les cas si on veut compter les cellules d'une couleur précise il faut avoir le code index de la couleurs exemple pour le rouge l'index est le 3
ce code est à associer à un bouton et comptera toutes les cellules de couleur sur la plage A1 à A100.
Sub Test()
For Each o In [A1:A100]
If o.Interior.ColorIndex <> xlNone Then i = i + 1
Next
MsgBox i
End Sub
pour compter les cellules de couleur verte en supposant qu'il s'agit du vert brillant
Sub Test()
For Each o In [A1:A100]
If o.Interior.ColorIndex = 4 Then i = i + 1
Next
MsgBox i
End Sub
Le nombre s'affiche sur une boite de dialogue (msgbox) mais pourrait s'afficher dans une cellule exemple en B1
remplacer
MsgBox i
par
[B1] = i
ou simplement ajouter la ligne
On pourrait également afficher le code couleur dans une liste déroulante ce qui permettrait en un clic avoir le nombre de cellules de la couleur sélectionnée
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
UsulArrakis
Messages postés
7405
Date d'inscription
vendredi 28 mars 2003
Statut
Contributeur
Dernière intervention
27 janvier 2022
3 182
6 déc. 2010 à 09:05
6 déc. 2010 à 09:05
http://www.cijoint.fr/cjlink.php?file=cj201012/cijqGvdnnZ.zip
quelques fichiers qui permettent de compter les couleurs
dont un fichier du regretté Thierry POURTIER ("Ti" pour les intimes :-) trouvé sur son site "VERITI" : http://vlohr.free.fr/veriti/forum/index.php
quelques fichiers qui permettent de compter les couleurs
dont un fichier du regretté Thierry POURTIER ("Ti" pour les intimes :-) trouvé sur son site "VERITI" : http://vlohr.free.fr/veriti/forum/index.php
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
29
16 mai 2011 à 15:41
16 mai 2011 à 15:41
Merci pour vos répone et désolé d'avoir mis si longteps à repondre.
Est ce possible d'utiliser une formule plus qu'une macro
Est ce possible d'utiliser une formule plus qu'une macro
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
29
16 mai 2011 à 15:45
16 mai 2011 à 15:45
Je devrais peut etre préciser ma demande...
j'ai une plage de cellule de C17 à AC34 et j'aimerais connaitre facilement le monbre de cellules vertes, oranges, bleues et rouges de cette plage...
j'ai une plage de cellule de C17 à AC34 et j'aimerais connaitre facilement le monbre de cellules vertes, oranges, bleues et rouges de cette plage...
Mike-31
Messages postés
18313
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 avril 2024
5 073
16 mai 2011 à 15:49
16 mai 2011 à 15:49
Re,
tout dépend comment tes cellules sont colorisées:
manuellement la réponse est non
sur une mise en forme conditionnelle c'est possible mais dans ce cas quelle est la formule conditionnelle utilisée
tout dépend comment tes cellules sont colorisées:
manuellement la réponse est non
sur une mise en forme conditionnelle c'est possible mais dans ce cas quelle est la formule conditionnelle utilisée
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
29
16 mai 2011 à 15:51
16 mai 2011 à 15:51
c'est des couleurs mise manuellement...
et la c'est le drame...
c'est vraiment pas possible?
On peux pas compter le nombre de cellules ayant le code couleur tant et le nombre de cellule ayant le code couleur tant2 etc?
:(
c'est triste...
et la c'est le drame...
c'est vraiment pas possible?
On peux pas compter le nombre de cellules ayant le code couleur tant et le nombre de cellule ayant le code couleur tant2 etc?
:(
c'est triste...
Mike-31
Messages postés
18313
Date d'inscription
dimanche 17 février 2008
Statut
Contributeur
Dernière intervention
21 avril 2024
5 073
16 mai 2011 à 16:33
16 mai 2011 à 16:33
Re,
Si il est possible mais avec un code VBA soit avec une fonction personnalisée ou une macro que l'on colle dans le visual basic
un petit exemple de code qui comptera les cellules de couleur rouge de la plage A1 à A100 et affichera le nombre dans la cellule C2.
sélectionne le code ci-dessous et clic droit/Copier
clic droit sur l'onglet de ta feuille/Visualiser le code et dans la partie blanche de la feuille qui s'est ouverte clic droit Coller
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For Each o In [A1:A100]
If o.Interior.ColorIndex = 3 Then i = i + 1
Next
[C2] = i
End Sub
Si il est possible mais avec un code VBA soit avec une fonction personnalisée ou une macro que l'on colle dans le visual basic
un petit exemple de code qui comptera les cellules de couleur rouge de la plage A1 à A100 et affichera le nombre dans la cellule C2.
sélectionne le code ci-dessous et clic droit/Copier
clic droit sur l'onglet de ta feuille/Visualiser le code et dans la partie blanche de la feuille qui s'est ouverte clic droit Coller
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
For Each o In [A1:A100]
If o.Interior.ColorIndex = 3 Then i = i + 1
Next
[C2] = i
End Sub
Qhes
Messages postés
176
Date d'inscription
lundi 29 septembre 2008
Statut
Membre
Dernière intervention
21 mai 2014
29
16 mai 2011 à 16:36
16 mai 2011 à 16:36
Merci,
ca marche!!! c'est génial
j'ai juste ajouter un bouton et une boite de dialogue pour afficher le résultat :))
c'es trop bien merci :)
ca marche!!! c'est génial
j'ai juste ajouter un bouton et une boite de dialogue pour afficher le résultat :))
c'es trop bien merci :)
