Compter le nombre d'occurence dans excel

paco-fcgb -  
Bonjour,

Je dois compter le nombre de case dans une colonne comprises entre 0 et 50, j'ai essayé cette fonction VBA:

Function Nbre_fibres(Inf, Sup)

Dim Nbre As Integer
Nbre = 0

For ligne = 54 To 196

If Range("A&ligne").Value > Inf And Range("A&ligne").Value <= Sup Then
Nbre = Nbre + 1
End If

Next ligne

Nbre_fibre = Nbre

End Function

J'appelle ma fonction comme ceci:

=Nbre_fibres(0;50)

Mas ça marche pas des masses...
Quelqu'un aurait la solution? Il existe peut-être une formule excel toute fait

3 réponses

  1. michel_m Contributeur
    Bonjour

    avec une formule classique

    =Sommeprod((A54:A196>=0)*(A54:A196<=50)*1)

    avant de penser VBA, penser Excel :o)
    1
    1. blux Modérateur
      Salut,

      la fonction nb.si() ?
      0
      1. ccm81
        ou si tu y tiens vraiment

        If Range("A" & ligne).Value > Inf And Range("A" & ligne).Value <= Sup Then

        bonne suite
        0