OVH Cloud OVH Cloud

Nb de cellules selon critères

2 réponses
Avatar
Marie Sukic
Bonjour,
En A1 B1 j'écris en rouge.En C1 j'écris en noir.(que des chiffres)
En D1 je voudrais savoir le nb de cellules écrites en rouge.
Est ce possible ?
Merci de vos réponses éclairées.

2 réponses

Avatar
Jacquouille
Bonsoir Marie
Si tu écris en rouge en A1:B1, il n'y a pas beaucoup de cellules
remplies. -))
Pour la beauté du geste, tu peux écrire dans une cellule =
nbval(A1:B1).Cependant, il faut faire gaffe aux cellules vides qui
contiennent des espaces, car cela compte comme si l'espace était plein de
quelque chiffre ou lettre.
Mais, cette savante formule te comptera les cellules non vides, même si
elles sont écrites en vert ou en noir.
Bonne chance

--
Bien amicalmement,
Vivement conseillés:
http://www.excelabo.net
http://jacxl.free.fr/mpfe/trombino.html
http://dj.joss.free.fr/netiquet.htm
http://frederic.sigonneau.free.fr/

Jacquouille.

"Marie Sukic" a écrit dans le message de
news: duf7l9$lo6$
Bonjour,
En A1 B1 j'écris en rouge.En C1 j'écris en noir.(que des chiffres)
En D1 je voudrais savoir le nb de cellules écrites en rouge.
Est ce possible ?
Merci de vos réponses éclairées.




Avatar
Daniel
Bonsoir.
Possible ?, avec VBA, oui.
Essaie la fonction suivante où plage représente une plage de cellules
(A1:B1, par exemple) et Couleur le numéro de la couleur :

Function CellCouleur(Plage As Range, Couleur As Long)
For Each cell In Plage
If cell.Font.Color = Couleur Then
CellCouleur = CellCouleur + 1
End If
Next cell
End Function

Tu peux obtenir le numéro de la couleur avec la fonction :

Function QuelleCouleur(Plage As Range)
QuelleCouleur = Plage.Font.Color
End Function

où Plage représente UNE cellule ou une plage ayant la même couleur de
police.
Cordialement.
Daniel
"Marie Sukic" a écrit dans le message de
news: duf7l9$lo6$
Bonjour,
En A1 B1 j'écris en rouge.En C1 j'écris en noir.(que des chiffres)
En D1 je voudrais savoir le nb de cellules écrites en rouge.
Est ce possible ?
Merci de vos réponses éclairées.