Empécher l'insertion de doublon dans une cellule via bouton

Bonjour tout le monde,

Je voudrais peaufiner une petite chose que je n'arrive pas, comme c'est indiquer dans le titre c'est d’empêcher l'insertion d'un doublon dans une cellule, je m'explique :

J'ai plusieurs boutons, dans mon exemple 2, qui insèrent des mots prédéfinis dans une même cellule, je voudrais que lorsqu'on appuie plusieurs fois sur le même bouton et qu'il y a déjà le mot prédéfini du bouton dans la cellule que celui-ci ne se rajoute pas mais que ça n'empêche pas l'insertion des autres boutons ou les supprime

Je joins un fichier d'exemple pour mieux comprendre

Merci d'avance

Bonsoir,

Private Sub CommandButton1_Click()
If Me.Range("E10").Value Like "*=>Teste*" Then Exit Sub
    With Me.Range("E10")
        .Value = .Value & " =>Teste"
    End With
End Sub

Private Sub CommandButton2_Click()
    If Me.Range("E10").Value Like "*//Essai*" Then Exit Sub
    With Me.Range("E10")
        .Value = .Value & " //Essai"
    End With
End Sub

@ bientôt

LouReeD

Bonjour,

C'est tout ce qu'il me fallait

Je n'avais jamais vu encore le

Like

Merci encore

Bonsoir,

et merci de votre merci, I Like !

@ bientôt

LouReeD