Colonne double

Résolu/Fermé
mimi - 14 mai 2016 à 23:54
 mimi - 16 mai 2016 à 09:57
. Bonjour,

(COMMENT écrire la formule =ColorCountIf(N13:N17;R9)+(P13:P17;R9)

A voir également:

3 réponses

Raymond PENTIER Messages postés 58777 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 24 décembre 2024 17 258
15 mai 2016 à 00:47
Heu ! C'est une vraie formule, ou plutôt une ligne de code VBA ?
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
15 mai 2016 à 08:28
Bonjour,

A priori, tu devrais écrire :
=ColorCountIf(N3:N17;R9)+ColorCountIf(P13:P17;R9)

Pour info, la fonction personnelle ColorCountIf permet de compter le nombre de cellules qui ont la même couleur de remplissage qu'une cellule de référence.

Voici le code correspondant
Function ColorCountIf(SearchArea As Object, BgColor As Range) As Integer
Dim MaCoul As Integer
Dim Cel As Range
Application.Volatile True
ColorCountIf = 0
MaCoul = BgColor.Interior.ColorIndex
For Each Cel In SearchArea
If Cel.Interior.ColorIndex = MaCoul Then ColorCountIf = ColorCountIf + 1
Next Cel
End Function

et un exemple
https://www.cjoint.com/c/FEpgBunQivC

A+
0
OK MERCI GIRUS J'avais bien écri comme tu le suggères sauf que je me mélangeais les pinceaux avec mes cellules
super merci
vous êtes tous formidables

merci merci
0