Comparer valeur cellule

bonjour

j'ai une macro qui insert un nom de commande dans la cellule B2 depuis la textbox1 mais dans la colonne A de la feuille sommaire commande j'ai le recap de toute les commandes. comment comparer le nom dans la textbox1 et la colonne A de la feuille sommaire commande, et si le nom est déjà présent rajouter + 1 a la fin du nom.

merci

Private Sub CommandButton1_Click()
Sheets("Sheet").Range("B2").Value = TextBox1
Worksheets("Sheet").Copy After:=Sheets(Sheets.Count)
ActiveSheet.Name = Range("B2")
en sub

Bonjour Shinxou, bonjour le forum,

C'est très clair mais pour tester il faut recréer ton environnement et j'ai la flemme... Le fichier qui va bien serait le bienvenu.