Procédure VBA : arrayDuplicatesList
La procédure VBA arrayDuplicatesList compte le nombre de fois que chaque valeur est présente dans le tableau et ajoute une 2e dimension au tableau pour enregistrer ces valeurs (1 = unique, 2 = valeur à double, etc).
Cette procédure ne supprime aucune donnée.
Utilisation :
arrayDuplicatesList tableau
Exemple d'utilisation
Application de cette procédure pour compter les valeurs arrayDuplicatesList tableau
:
Sub exemple()
tableau = Array("SI", "RECHERCHEV", "SOMME", "NB", "JOINDRE", "NB", "ESTNUM", "SI", "STXT", "RECHERCHEV", "SOMME", "JOINDRE", "NB")
arrayDuplicatesList tableau
End Sub
Pour vérifier si cela a bien fonctionné, vous pouvez utiliser array2dDebug pour afficher le contenu du tableau à 2 dimensions dans une MsgBox :
Sub exemple()
tableau = Array("SI", "RECHERCHEV", "SOMME", "NB", "JOINDRE", "NB", "ESTNUM", "SI", "STXT", "RECHERCHEV", "SOMME", "JOINDRE", "NB")
arrayDuplicatesList tableau
array2dDebug tableau
End Sub
Remarque : cette fonction nécessite l'installation du pack de fonctions XLP (un add-in gratuit pour Excel qui ajoute 92 nouvelles fonctions).