=SOMMEPROD(N(NB.SI(A1:A1000;A1:A1000)=1))
=NBVAL(A1:A1000)-SOMMEPROD(N(NB.SI(A1:A1000;A1:A1000)=1))
=SOMMEPROD(1/NB.SI(A1:A8;A1:A8))
=ARRONDI(SOMMEPROD(1/NB.SI(A1:A1000;""&A1:A1000));0)-SIGNE(NB.VIDE(A1:A1000))
=N(NB.SI(B$2:B2;B2)=1)
=SOUS.TOTAL(9;A2:A9)
Function NBDIF(r As Range)
Dim d As Object
Application.Volatile
Set d = CreateObject("Scripting.Dictionary")
For Each r In r
If Not r.EntireRow.Hidden Then d(r.Value) = ""
Next
NBDIF = d.Count
End Function
=NB(1/FREQUENCE(SI(SOUS.TOTAL(2;DECALER(B1;LIGNE(B1:B8);));EQUIV(A2:A9;A2:A9;0));LIGNE(B1:B8)))