Excel Somme conditionnel

Asfero -  
Bonjour à tous,

C'est encore moi, je vous explique mon problème.

Dans une colonne A, j'ai des cases à cocher, disons en A1, A2, A3
Dans une colonne B, j'ai des chiffres, disons 1 en B1, 2 en B2, 3 en B3

Lorsque je coche la case dans la cellule A1, mon chiffre en B1 se colore en bleu et de même pour les 2 lignes suivantes. Jusque la tout est bon.

Mon problème: j'aimerais effectué une addition disons en B4, seulement avec les chiffres qui se colorent en bleu.
Autrement dit quand je coche A1 et A2, le 1 de la cellule B1 devient bleu et le 2 de B2 bleu aussi, j'aimerais donc que la somme pour les cellules B1 à B3 soit de 3 et qu'ainsi la somme ignore le 3 de B3 puisqu'il n'est pas bleu.

une formule en VBA serait pas mal a moins qu'il y est plus simple

voila

Merci de votre aide
Configuration: Windows XP
Firefox 3.0.10

6 réponses

  1. Asfero Auteur
    J'oubliais j'ai beaucoup plus que 3 chiffres à additionner

    merci
    0
    1. qmike
      bonjour
      Tiens un exemple ici
      tu peux t'en inspirer
      http://bvrve.club.fr/Astuces_Michel/05excelvba.html#Color1

      bonne journée
      0
      1. Asfero Auteur
        le problème c'est que je connais pas tout ce qui est inscrit

        Sub TotalisationCouleurRouge()

        Set Aselectionner = Application.InputBox _
        (prompt:="selectionner la plage de cellule ", _
        Title:=" Plage de cellules à sélectioner", Type:=8)
        Aselectionner.Select 'Selection de la plage souhaitée
        For Each cel In Aselectionner
        If cel.Interior.ColorIndex = 3 Then SomRouge = SomRouge + cel
        Next cel
        MsgBox SomRouge
        End Sub

        comment je fais avec une autre couleur que rouge disons en chiffre ?
        0
        1. Asfero Auteur
          et question de base, comment je fais pour assigner un code VBA a une cellule ?

          merci
          0
          2. qmike
            aie désolé tu ne connais pas les macros

            sélectionne le Menu Outils --> Macro --> Visual basic Editor
            ou ALT + F11
            puis tu colles le code donné et tu le modifies à ta sauce
            0
            1. Asfero Auteur
              Salut,

              je comprends pas.

              Quand je vais dans macro et VBA une nouvelle fenêtre s'ouvre, mais il y a rien pour écrire, et je trouve pas l'option pour faire un nouveau code ou autre ?

              une fois écrit comment je l'applique a une cellule ce code ?

              et si je veux utiliser une autre couleur que rouge comment je fais avec le code précédent ?

              merci
              0
          3. qmike
            il n'y a pas d'option
            Il suffit de faire un copier/coller du code
            c'est pas compliqué
            0