[EXCEL-FORMULE] Calcul NB de VAL spécifique

Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   -  
Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je souhaite calculer dans une colonne le nombre de case verte sachant que chaque cellule de cette colonne est soumise à une Mise en forme conditionnelle pourriez vous m'aider à trouver cette formule.

Je pense qu'il faut utiliser NB.SI(;)

On aurait alors NB.SI(O7:O807;?) ce que je cherche c'est ce qu'il y a à la place du ? et qui contient donc la propriété couleur verte

Chaque date peut être modifiée par une date plus récente il n'y a pas de date limite de début ni de fin.
La cellule est colorée Vert, Orange ou Rouge selon la validité de la date.

Pouvez vous m'aider :'( ?
Configuration: Windows XP
Firefox 3.0.6

6 réponses

  1. Utilisateur anonyme
     
    si tu regarde plutot la date plutot que la couleur, pas besoin de chercher le paramettre, nan?
    0
  2. Biloue
     
    Bonjour,

    Je crois pas que ce soit possible par les formules excel directement.
    Ce que tu peux faire mais je pense que tu y as déjà pensé, c'est réutilisé les conditions de la mise en forme conditionnelle pour compter tes cellules.

    Après tu peux passer par un petit code vba qui en fonction de la couleur de ta cellule incrémente un compteur.

    Fais moi savoir tu as besoin d'aide sur le code vb.

    Biloue
    0
    1. Utilisateur anonyme
       
      nan mais il a deja utilisé un code pour mettre la couleur automatiquement je pense, donc si il le reprend, il peu faire ce qu'il voulait :D
      0
    2. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275
       
      Ajouter une macro implique créer un bouton je ne désire pas de boutons. . . je peux passer par une feuille supplémentaire que je cache ou je mets une condition ou j'obtiens 1 quand la date est valide (donc quand la case est verte) et je compte les 1 mais j'aimerai faire plus propre...


      Au pire si j'ai pas le choix mon tableaux de synthèse sera vide et je ferai par VB pour le remplir mais je n'ai pas qu'une colonne à faire et si je passe par VB ce sera interminable . . .
      0
  3. Utilisateur anonyme
     
    Function Farbig(CL As Range) As Long
    If CL.Interior.ColorIndex = ? Then ....
    End Function

    a la place de ? tu mets le code couleur souhaité et la place de .... tu mets ta fonction

    tu voulais le nombre de case je crois alors t'as juste a incrémenter une valeur ;)
    0
  4. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275
     
    oki j'testerai ça tout à l'heure en attendant tu peux tester voir si t'arrive à trouver la fonction avec l'aide excel c'est ce que je fais mais j'avoue tourner en rond je continue à chercher aidez moi compagnons :D
    0
    1. Utilisateur anonyme
       
      désolé, faut que je taff des fois x)

      je pourrais pas plus t aider avant la fin du week, je taff la et aprés je pars et j aurai pas le net -_-'

      bon week et bonne chance !
      0
      1. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275 > Utilisateur anonyme
         
        bah merci quand même et à la semaine prochaine bix
        0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Bidouilleu_R Messages postés 1209 Statut Membre 296
     
    Bonjour,

    moi je fais comme ça...

    Sub test()
    Sheets("feuil1").Select
    x = NbCelluleCouleur(Range("C6:d25"), 6)
    End Sub

    sur la feuille =NbCelluleCouleur(C6:D30;6)

    6 c'est jaune

    la fonction.

    Function NbCelluleCouleur(Cel As Range, Coul As Long) As Long
    Dim c As Variant
    For Each c In Cel
    If c.Interior.ColorIndex = Coul Then

    i = i + 1
    End If
    Next

    NbCelluleCouleur = i

    End Function
    0
    1. Utilisateur anonyme
       
      je te vois partout x)

      bah merci d'avoir pris le relais (en fin de compte j'ai la connexion mais je serai pas la souvent)


      gg ;)
      0
  7. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275
     
    je voulais pas passer par le code
    j'ai la solution

    En formule Excel :

    =NB(SI((AUJOURDHUI()-C4:C13<($C$2*365*0,8));C4:C13))
    -
    -
    ---> =Nb.Si("TaPlage";"Ta condition dans la MFC qui donne la couleur verte à la cellule")
    0
    1. Utilisateur anonyme
       
      je me cite :
      "Si tu regarde plutot la date plutot que la couleur, pas besoin de chercher le paramettre, nan?"



      ce que j'avais dis en premier post quoi :D
      0
    2. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275 > Utilisateur anonyme
       
      Faut que je retrouve ça mais ça marchait aussi en comptant les couleurs
      0
    3. Utilisateur anonyme > Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention  
       
      nanan, je voulais dire que plutot que regarder les couleurs, regarder la date donc l'algo qui met les couleurs x)
      0
    4. Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention   275 > Utilisateur anonyme
       
      J'avais compris au bout d'la 2ème fois tu sais xD
      0
    5. Utilisateur anonyme > Doudou95 Messages postés 1897 Date d'inscription   Statut Membre Dernière intervention  
       
      mdr ouai mais bon, j'aime enfoncer un peu le clou ... et un petit proverbe : c'est sur le cou qui dépasse que l'on tappe

      (n'a rien a voir avec le sujet mais bon :p)
      0