Procédure VBA : arrayValuesDelete
La procédure VBA arrayValuesDelete supprime toutes les valeurs d'un tableau correspondant à la valeur recherchée.
Cette procédure ne se contente pas d'effacer les valeurs mais les supprime (la taille du tableau est donc réduite en conséquence).
Utilisation :
arrayValuesDelete tableau, valeur_recherchée
Exemple d'utilisation
Suppression des valeurs "Test" dans le tableau arrayValuesDelete tableau, "Test"
:
Sub exemple()
tableau = Array("Test", "Démo", "Exemple", "Test", "Excel-Pratique", "Test", "Test")
arrayValuesDelete tableau, "Test" 'Suppression des valeurs "Test" du tableau
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("Test", "Démo", "Exemple", "Test", "Excel-Pratique", "Test", "Test")
arrayValuesDelete tableau, "Test" 'Suppression des valeurs "Test" du tableau
arrayDebug tableau '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).