compter des cellules rouges dans une ligne

Dan

XLDnaute Barbatruc

• 26 Septembre 2005

• #2

Bonjour,

Suis ce lien et télécharge le fichier Lien supprimé fait par notre ami Thierry et placé par Zon.

Bon travail

 

Vote positif 0 Vote négatif

L

la meule

Guest

• 26 Septembre 2005

• #3

Merci.Je n'y arrive pas.Les cellules rouges sont sans texte et en lignes,et je voudrais compter les cellules rouges dans chaque lignes.Je pars par exemple de la ligne 2 colonne f,g,h, etc.

 

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

• 26 Septembre 2005

• #4

Re:

Place un petit fichier exemple avec données bidons.

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 26 Septembre 2005

• #5

Bonjour La meule, Bonjour Dan,

Essaye la fonction suivante:

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

Cliquez pour agrandir...

A mettre dans un module de ton classeur puis à utiliser comme une fonction XL cmassique par exemple:

=Colorcountif(A1:G1;C1)

==> compter les cellules de la plage A1:G1 dont la couleur est identique à C1.

@+

Gael

 

Vote positif 0 Vote négatif

L

la meule

Guest

• 26 Septembre 2005

• #6

Voila un exemple.Je dois compter les cellules rouges en bout de ligne ou autre. [file name=Classeur1_20050926175539.zip size=1400]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20050926175539.zip[/file]

 

Pièces jointes

• Classeur1_20050926175539.zip

  1.4 KB · Affichages: 13

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

• 26 Septembre 2005

• #7

Re,

Voici un exemple que j'ai récupéré d'un fil. Je n'ai malheureusement pas l'auteur de ce fichier mais je pense que cela peut te servir.

[file name=couleur_Somme.zip size=13370]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/couleur_Somme.zip[/file]

Message édité par: Dan, à: 26/09/2005 18:43

 

Pièces jointes

• couleur_Somme.zip

  13.1 KB · Affichages: 34

Vote positif 0 Vote négatif

L

la meule

Guest

• 26 Septembre 2005

• #8

Merci.Comment on ouvre un module? Il faut recopier le code de la fonction dans le module?Je m'excuse pour toutes ces questions,mais je n'ai que quelques notions de base.

 

Vote positif 0 Vote négatif

Gael

XLDnaute Barbatruc

• 26 Septembre 2005

• #9

Rebonsoir,

Ci-joint ton fichier modifié avec le comptage des cellules rouges ligne par ligne et pour la plage entière.

Pour voir la fonction VBA 'ColorcountIf' tu vas dans l'éditeur VBA (Outils Macros VBA editeur ou Alt-F11) et tu regardes dans 'Module 1'.

L'exemple que t'a envoyé Dan permet en plus de totaliser les contenus des cellules de couleur ce qui peut être aussi très utile.

@+

Gael [file name=Couleur_20050926195523.zip size=6571]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Couleur_20050926195523.zip[/file]

 

Pièces jointes

• Couleur_20050926195523.zip

  6.4 KB · Affichages: 26

Vote positif 0 Vote négatif

L

la meule

Guest

• 27 Septembre 2005

• #10

Merci pour vos réponses,çà marche!

 

Vote positif 0 Vote négatif