Bonjour, je suis confronté à un petit problème...
Je vais essayer d'être clair...
Dans l'initialisation d'une Userform, je relève dans une feuille, des codes d'erreur que je range dans un tableau.
Voici juste pour info le code des deux boucles.
//////////////////////////////////////////////
'Palmarès des erreurs (10)
For Rang = 1 To NomErrTot
ReDim Palm(Rang)
Next
Rang = 1
For LiG = 3 To Ligne
For ColErr = 13 To 21
If Cells(LiG, ColErr).Value <> "" Then
Palm(Rang) = Cells(LiG, ColErr).Value
Rang = Rang + 1
End If
Next
Next
//////////////////////////////////////////////
Ces codes d'erreur peuvent bien sur revenir plusieurs fois, et ont la forme A1, A2, A3, etc...
Je me retrouve donc avec un tableau Palm(Rang) de taille assez conséquente (800 entrées actuellement) dont certaines sont identiques.
J'aimerais à l'aide de ce tableau calculer le "top ten" de ces codes d'erreur.
Classer en premier celui qui arrive le plus souvent, en deux le suivant, ainsi de suite, et les afficher sur ma Userform.
Et là, je bloque.
Si quelqu'un pouvait me dépanner d'une boucle de tri ça m'aiderait bien....
J'espère ne pas avoir été trop brouillon.
Merci ...