énumération de cellules

[sylv@in]

bonjour, je voudrais utiliser la fonction NB.SI qui compte le nombre de cellules correspondants a un critère dans une plage. Seulement, mes données ne sont pas situées dans une plage mais dans des cellules dispachées un peu partout.

Donc au lieu de faire = NB.SI(H1:H8;"0")
ce qui selectionnerai la plage de H1 a H8 et compterai le nombre de cases contenant 0.

Je voudrais pouvoir faire quelque chose dans ce style:
=NB.SI((J1;L7;M8);"0"))
ce qui me renverrai le nombre de case contenant 0 parmis J1,L7 et M8. Seulement cette syntaxe ne fonctionne pas...merci de votre aide

 

[Staple1600]

Re : énumération de cellules

Bonjour


Tu as essayé?


=NB.SI(J1;L7;0)+NB.SI(M8;0)

 

[JCGL]

Re : énumération de cellules

Bonjour à tous,

Peux-tu essayer avec :

=NB.SI(J1;0)+NB.SI(L7;0)+NB.SI(M8;0)

A+

 

[sylv@in]

Re : énumération de cellules

merci beaucoup ca fontionne très bien!

 

[BOISGONTIER]

Re : énumération de cellules

Bonjour,

Function NbSiMZ(champrech As Range, valCherchée)
  Application.Volatile
  temp = 0
  For i = 1 To champrech.Areas.Count
    For j = 1 To champrech.Areas(i).Count
      If valCherchée = champrech.Areas(i)(j) Then
        temp = temp + 1
      End If
    Next j
  Next i
  NbSiMZ = temp
End Function

=NbSiMZ((C3:C7;E5:E9;G7:G10);"a")

JB
Formation Excel VBA JB

 

[Staple1600]

Re : énumération de cellules

Bonjour à tous

EDITION: Comme le fait remarquer Tibo (bonjour)
Le OU n'est pas utile.
=(J1=0)+(L7=0)+(M8=0)





Une autre façon
=OU(J1=0)+OU(L7=0)+OU(M8=0)

 

[Hervé]

Re : énumération de cellules

bonjour ^^

j'y vais aussi de ma petite fonction personnalisée:

=nbsi2((B5;B9;B12;D14;A1:A31);"0")

Public Function nbsi2(cellules As Range, critere)
Dim c As Range
 
For Each c In cellules
    nbsi2 = nbsi2 - (c.Text = critere)
Next c
 
End Function

bye