Supression des caracatés

Bonjour,

Je cherche de faire une macro qui peut Identifier tous les caractères qui existe sur la table 2 et les supprimes sur la table 1.

Merci pour votre support & Help

activation01 a écrit :

Bonjour,

Je cherche de faire une macro qui peut Identifier tous les caractères qui existe sur la table 2 et les supprimes sur la table 1.

Merci pour votre support & Help

Nettoyage conditionné.png

Bonjour,

Pas besoin de macro, tu as la fonction =SUBSTITUE() (Replace() en VBA). Exemple en B2 :

=SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(A2;$C$2;"");$C$3;"");$C$4;"");$C$5;"")

Je suppose qu'il y a une erreur dans ton illustration, puisque tous les caractères du 2ème cas sont supprimés.

Merci Pedro22

Merci infiniment , la fonction marche très bien , c'est juste un exemple , le principe c'est d'avoir cette fameuse fonction

Si la liste 2 est à géométrie variable, cela se complique

Par macro cela donne:

Sub Test()
    For i = 2 To Cells(Rows.Count, "A").End(xlUp).Row
        For j = 2 To Cells(Rows.Count, "C").End(xlUp).Row
            Cells(i, "A") = Replace(Cells(i, "A"), Cells(j, "C"), "")
        Next
    Next
End Sub