mise en forme identique

[razelbok]

Bonjour à tous. J'aimerais savoir s'il existe une fonction qui me permette de compter le nombre de cellules qui ont la même mise en forme (trame de fond, ...). Par exemple, je note des dispos de personnes en les coloriant en vert, et je voudrais qu'à la fin, il me compte combien de cellules vertes ont ces personnes. Je pense que c'est possible mais je ne me rappelle plus comment.

Cordialement

Niko

Ci-joint, un exemple de mon tableau

 

[Christelle]

Bonjour Razelbok !

Tu n'as pas joint de fichier mais si il y a un chiffre dans ta cellule coloriée, une p'tite VBA :

Function Sum_Color(Data As Range, Critère As Range)
'Fonction qui additionne en fonction de la couleur de fond
Dim Ref_Color As Variant
Dim Cell As Variant
Application.Volatile True
Ref_Color = Critère.Interior.ColorIndex
Sum_Color = 0
For Each Cell In Data
If Cell.Interior.ColorIndex = Ref_Color Then
Sum_Color = Sum_Color + Cell.Value
End If
Next Cell
End Function

Sinon, joint ton fichier STP.

Cordialement,

 

[mafaro]

bonjour christelle,
Je suis interessé par ton travail et cette solution pour compter des cellules avec trames de fond:
Hélas je suis débutant et même avant..; pour le vba..
Peux tu STP m'indiquer où mettre cette jolie formule.
J'ai essayé modules , thisworkbook et ensuite mettre =Sum_Color dans cellule mais je suis sûr que j'ai tout FAUX car évidemment çà ne marche pas
Merci de prendre un peu de ton temps pour un néo..

 

[Christelle]

Bonjour à tous,

Mafaro, moi j'ai mis ma macro dans un module, je n'ai rien fait d'autre... Je travaille avec Excel 97 c'est dire... Je te joins un fichier pour t'aider.
Bon courage.

Cordialement,

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

 

[Razelbok]

salut Christelle.
désolé j'ai du faire une erreur de manip. Je t'envoie le fichier mais n'y a-t-il pas de solution sans vba? (en effet, avec un chiffre par mise en forme)

Merci

Niko

 

[Razelbok]

salut Christelle.
- un ptit pbm de nom de fichier je pense -
Niko [file name=disposmars240306_2.zip size=4356]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/disposmars240306_2.zip[/file]

 

[mafaro]

Merci christelle

Je teste et te tiens au courant si soucis

Merci à vous tous pour cet entre-aide

 

[Christelle]

Salut Niko et Mafaro !

Voici ton fichier avec le décompte par couleur j'espère que c'est ce que tu voulais.
PS : au début je pensais qu'il y avait les chiffres dans tes cellules coloriées... oupsss

Mafaro, jette un coup d'oeil à cette macro, il y a un petit changement.

Cdt,

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

 

[razelbok]

merci et bravo, c'est ca à 90% ... je m'occuppe des 10 derniers

A plus

niko