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
excel vba array duplicates list

Remarque : cette fonction nécessite l'installation du pack de fonctions XLP (un add-in gratuit pour Excel qui ajoute 92 nouvelles fonctions).