somme de cellule coloré avec ou sans motif.

G

Guest

Guest

• 5 Janvier 2010

• #2

Re : somme de cellule coloré avec ou sans motif.

bonjour,

Et les macros de comptage, elles sont restées dans le vide incommensurable d'internet.
Ou faut-il qu'on les réécrive nous-même?

A+

 

Vote positif 0 Vote négatif

C

choco03

Guest

• 5 Janvier 2010

• #3

Re : somme de cellule coloré avec ou sans motif.

Désolé je ne comprend se que tu me dit.
Je ne connait rien en informatique et encor moins sur EXCEL.

On m'a donnée un coup de main pour compté des cellules coloré et des cellule avec motif mais je n'arrive pas a compté les cellules avec un motif et une couleur spécifique.

Cordialement.

 

Vote positif 0 Vote négatif

G

Guillaumega

XLDnaute Impliqué

• 5 Janvier 2010

• #4

Re : somme de cellule coloré avec ou sans motif.

Bonjour,

Voici deux macros qui viennent calculer le nombre de cellules colorées en fonction de la couleur du fond et de la couleur du texte.

Bonne réception,
Guillaumega

 

Pièces jointes

• V2 13oct.xls

  32 KB · Affichages: 414
• V2 13oct.xls

  32 KB · Affichages: 487
• V2 13oct.xls

  32 KB · Affichages: 484

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 5 Janvier 2010

• #5

Re : somme de cellule coloré avec ou sans motif.

Bonjour choco03, salut Hasco, mes meilleurs voeux 🙂

Vous ne comprenez pas ? Vous avez écrit :

choco03 à dit:

j'ai deux macros une pour compter les cellules coloré et l'autre pour les motifs.

Cliquez pour agrandir...

... pas de macro 😉

A+

 

Vote positif 0 Vote négatif

C

choco03

Guest

• 5 Janvier 2010

• #6

Re : somme de cellule coloré avec ou sans motif.

Désolé je ne comprenais pas.

Voici les deux macro que j'ai dans VBA:

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


Public Function cpteMotifs(CellRef As Range, plageRef As Range)
Dim c As Range
'attention éventuellement aux PatternColor et/ou PatternColorIndex
With Sheets("Feuil1")
For Each c In plageRef
If c.Interior.Pattern = CellRef.Interior.Pattern Then somme = somme + 1
Next c
End With
cpteMotifs = somme
End Function

Guillaumega Merci pour les macros mais se n' ai pas se que je cherché mais merci quand meme.

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 5 Janvier 2010

• #7

Re : somme de cellule coloré avec ou sans motif.

Bonjour à tous,
J'ai fait un exemple pendant que choco03 répondait...
Je le poste quand même, au cas ou.
Cordialement

 

Pièces jointes

• choco(1).xls

  30 KB · Affichages: 141

Vote positif 0 Vote négatif

C

choco03

Guest

• 5 Janvier 2010

• #8

Re : somme de cellule coloré avec ou sans motif.

eFgé ton document est trés interressant mais c'est pour les cellule coloré et grisé(motif) ne sont pas calculé.

Merci quand même de t' avoir penché dessus.

cordialement.

 

Vote positif 0 Vote négatif

G

Guest

Guest

• 5 Janvier 2010

• #9

Re : somme de cellule coloré avec ou sans motif.

Re,

Je ne connait rien en informatique et encor moins sur EXCEL.

Cliquez pour agrandir...

C'était la chose à dire en premier.

Dans ton fichier exemples les modtifs des cellules de référence n'étaient pas pas les mêmes que dans la plage de cellules à compter. De plus tu avais 4 cellules Bleues à motif et non 5

Voici deux fonctions
Une fonction qui compte les cellule à couleur de fond Sans motif
et une fonction qui compte celles qui ont les deux.

A+

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 5 Janvier 2010

• #10

Re : somme de cellule coloré avec ou sans motif.

Bonjour Hasco,
Un foncton c'est la rolls !
Il me reste vraiment tout à apprendre 😱
Cordialement

 

Vote positif 0 Vote négatif