Colonne double

Résolu
mimi -  
 mimi -
. Bonjour,

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

3 réponses

  1. Raymond PENTIER Messages postés 58213 Date d'inscription   Statut Contributeur Dernière intervention   17 482
     
    Heu ! C'est une vraie formule, ou plutôt une ligne de code VBA ?
    0
  2. Gyrus Messages postés 3360 Statut Membre 526
     
    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
  3. mimi
     
    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