Identifier les doublons sans prendre en compte les éléments d'une liste

Novice avance !?

XLDnaute Occasionnel
bonjour,
Ci-dessous le code que j'utilise pour identifier les doublons dans un tableau défini.
J'aimerais pouvoir l'adapter pour que l'exclusion qui ne touche pour l'instant que le mot "Repos" puisse prendre en compte une liste de mot à ne prendre en compte que l'utilisateur aura au préalable indiquer dans une cellule.

Du style en A1 je demande à l'utilisateur quels sont les mots ? et en A2 il les écrit en les séparant d'une virgule.

Du coup dans mon bout de code
Code:
Cell <> "Repos"
on aurait plutôt
Code:
Cell <> liste_utilisateur

Merci par avance

Code:
Sub GestionDoublons_liste(Plage As Range)
Dim Cell As Range
Dim Un As Collection
    
Set Un = New Collection
  
On Error Resume Next
    
For Each Cell In Plage
    If Cell <> "" And Cell <> "Repos" And IsNumeric(Cell) = False Then
        Un.Add Cell, CStr(Cell)
            If Err <> 0 Then Cell.Interior.ColorIndex = 4
        Err.Clear
    End If
Next Cell
    
Set Un = Nothing
End Sub
 

Statistiques des forums

Discussions
285 211
Messages
1 866 679
Membres
156 790
dernier inscrit
Diediene
Haut Bas