Procédure VBA : arrayDuplicatesDelete
La procédure VBA arrayDuplicatesDelete supprime tous les doublons d'un tableau.
Utilisation :
arrayDuplicatesDelete tableau
Exemple d'utilisation
Suppression des doublons du tableau arrayDuplicatesDelete tableau
:
Sub exemple()
tableau = Array("SI", "RECHERCHEV", "SOMME", "NB", "JOINDRE", "NB", "ESTNUM", "SI", "STXT", "RECHERCHEV", "SOMME", "JOINDRE", "NB")
arrayDuplicatesDelete tableau 'Suppression des doublons
End Sub
Pour vérifier si cela a bien fonctionné, vous pouvez utiliser arrayDebug pour afficher le contenu du tableau dans une MsgBox :
Sub exemple()
tableau = Array("SI", "RECHERCHEV", "SOMME", "NB", "JOINDRE", "NB", "ESTNUM", "SI", "STXT", "RECHERCHEV", "SOMME", "JOINDRE", "NB")
arrayDuplicatesDelete tableau 'Suppression des doublons
arrayDebug tableau, , , Chr(10) 'Affichage du tableau dans une MsgBox pour vérification
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).