Somme Cellule

Bonjour,

Je cherche pour un planning horaire a additionner sur la meme ligne les cellules selectionnées d une couleur.Pouvez vous m aider?svp.Merci

2 réponses

  • Votes
  • Date
  • Date décroissante
  1. Salut,

    comment colorises tu ces cellules, manuellement ou avec une mise en forme conditionnelle, dans ce cas quel en est la formule
    et de quelle couleur sont tes cellules
    1. Merci pour ta reponse, je colories mes cellules manuellement.Je veux juste avoir un total par ligne de ces cellules selectionnees en sachant : 1 cellule coloriees = 0.25h.MErci pour ton aide.
  2. Contributeur
    Bonsoir,

    Une proposition avec 2 fonctions personnalisée :
    - no_couleur(cellule) : retourne le numéro de couleur d'une cellule
    - nbCelCouleur(plage, no_couleur) : retourne le nombre de cellule de la couleur no_couleur

    syntaxe :
    =no_couleur(C1)

    =nbCelCouleur($C$4:$L$4;6)
    ou
    =nbCelCouleur($C$4:$L$4;no_couleur(C1))

    Function no_couleur(cellule As Range) As Long
        no_couleur = cellule.Interior.ColorIndex
    End Function
    
    Function nbCelCouleur(plage As Range, no_couleur As Long) As Double
        Dim c As Range
        For Each c In plage
            If c.Interior.ColorIndex = no_couleur Then nbCelCouleur = nbCelCouleur + 1
        Next c
    End Function

    fichier exemple : https://www.cjoint.com/?BIxxMjaKFTZ

    eric

    PS: divise par 4 le résultat comme tu veux 0.25 par cellule.