Sommer des cellules de meme couleur sous excel 2007 et 2010
Fermé
Fred94
-
5 oct. 2012 à 11:40
UsulArrakis Messages postés 7405 Date d'inscription vendredi 28 mars 2003 Statut Contributeur Dernière intervention 27 janvier 2022 - 5 oct. 2012 à 16:24
UsulArrakis Messages postés 7405 Date d'inscription vendredi 28 mars 2003 Statut Contributeur Dernière intervention 27 janvier 2022 - 5 oct. 2012 à 16:24
A voir également:
- Sommer des cellules de meme couleur sous excel 2007 et 2010
- Excel additionner des cellules - Guide
- Liste déroulante excel - Guide
- Excel cellule couleur si condition texte - Guide
- Somme si couleur excel - Guide
- Verrouiller des cellules excel - Guide
3 réponses
UsulArrakis
Messages postés
7405
Date d'inscription
vendredi 28 mars 2003
Statut
Contributeur
Dernière intervention
27 janvier 2022
3 182
5 oct. 2012 à 14:46
5 oct. 2012 à 14:46
salut
2 macros et une fonction à coller dans un module (elles ne sont pas de moi) mais fonctionnent
2 macros et une fonction à coller dans un module (elles ne sont pas de moi) mais fonctionnent
Sub CompteCouleur() Dim Compte As Integer 'pour remettre la couleur à rien Range("A1:D8").Interior.ColorIndex = xlColorIndexNone 'les cellules surveillées For Each c In Range("A1:D8") 'condition fixée If c >= "A" Then 'couleur appliquée ici rouge c.Interior.ColorIndex = 3 'pour faire la somme des cellules remplies Compte = Compte + 1 End If Next 'pour afficher notre somme en D9 Range("D9") = Compte End Sub Function ColorCountIf(SearchArea As Object, BgColor As Range) As Integer Application.Volatile True ColorCountIf = 0 MaCoul = BgColor.Interior.ColorIndex For Each Cell In SearchArea If Cell.Interior.ColorIndex = MaCoul Then ColorCountIf = ColorCountIf + 1 Next Cell End Function Sub CompteCouleur2() Dim Compte As Integer 'les cellules surveillées For Each c In Range("B1:B541") 'condition fixée If c.Interior.ColorIndex = 34 Then 'pour faire la somme des cellules remplies Compte = Compte + 1 End If Next 'pour afficher notre somme en C1 Range("C1") = Compte End Sub
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
5 oct. 2012 à 11:59
5 oct. 2012 à 11:59
bonjour
si la couleur vient d'une mise en forme conditionnelle, c'est jouable sans macro, sinon macro
bonne suite
si la couleur vient d'une mise en forme conditionnelle, c'est jouable sans macro, sinon macro
bonne suite
bonjour,
Non, pour la somme de ces cellules, il n'y a pas de mise en forme conditionnelle.
Donc, je vais me lancer dans une macro (pour la 1ère fois) !!! on va voir...
Pour une autre somme, je dois faire la somme de cellules avec mise en forme conditionnelle.
Dans ce cas, comment faire ?
Merci beaucoup pour votre aide :-))))
Non, pour la somme de ces cellules, il n'y a pas de mise en forme conditionnelle.
Donc, je vais me lancer dans une macro (pour la 1ère fois) !!! on va voir...
Pour une autre somme, je dois faire la somme de cellules avec mise en forme conditionnelle.
Dans ce cas, comment faire ?
Merci beaucoup pour votre aide :-))))
ccm81
Messages postés
10851
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
16 avril 2024
2 404
5 oct. 2012 à 14:49
5 oct. 2012 à 14:49
un exemple
https://www.cjoint.com/?3JfoWROxDtV
bonne suite
https://www.cjoint.com/?3JfoWROxDtV
bonne suite
5 oct. 2012 à 16:02
J'ai créé une macro du type du 3ème exemple, avec la couleur : RGB (192,192,192) que j'ai retrouvé dans la cellule, mais cela ne fonctionne pas.
J'ai fait "exécuter " dans la macro, mais cela ne fonctionne pas dans mon fichier.
Est-ce qu'il faut spécifier une feuille ? car dans mon fichier, j'ai plsuierus feuilles.
Merci à vous
5 oct. 2012 à 16:24
et le fichier avec les codes couleurs à utiliser
https://www.cjoint.com/?BJfqx1WtHoD