Re : Formule matricielle CTRL + MAJ + ENTREE gros challenge
cher efgé,
désolé si ce "detail" avait une importance si importante
je mentionnai bien au debut: j'y ai mis des extresmes car la base de données varie et je sais pas du tout comment remplacer ces valeurs extremes par des variables.
Function compter_uniques(MaPlage As Range) As Long
Set dico = CreateObject("scripting.dictionary")
For Each cellule In MaPlage
ref = cellule.Value
If Not dico.exists(ref) Then
dico.Add ref, ref
End If
Next
compter_uniques = dico.Count
End Function
10 secondes pour une zone de 400 000 nombres aléatoires
Le temps de valider par Entrer
Faut télécharger la macro complémentaire MoreFunc, on peut l’intégrer dans Excel2010, mais je ne sais pas si ça marche sur Excel2013..