XL 2010 Incrémentation spécifique

[ValentinLF]

Bonjour à tous,

Je travaille actuellement sur une base de donnée avec plusieurs Userform. C'est une base de donnée qui correspond à des armoires EDF.

Je possède donc un Userform, avec deux textbox, une correspondant au nom de l'armoire et l'autre à son identifiant qui remplissent respectivement la colonne A et B à partir de la ligne 2 de la feuil1.

Dans cette base de donnée, je peux retrouver plusieurs fois le même nom d'armoire.
J'aimerais donc quand j'inscris le nom de l'armoire dans mon Userform, par exemple RN1-TEST1, que dans ma textbox identifiant s'inscrive automatique "RN1-TEST1#1" s'il n'existe aucune Armoire dans la base de donnée sinon "RN1-TEST1#2" ou #3 etc.. en fonction du nombre d'armoire identique déjà inscrite.

Je vous remercie d'avance pour vos réponse.

(J'ai un fichier excel avec le bout de code et la base de donnée si nécessaire)

 

[job75]

Bonjour ValentinLF,

La question est un peu bizarre (trop simple ?) mais enfin sans voir le fichier :

Private Sub TextBox1_Change()
TextBox2 = TextBox1 & "#" & Application.CountIf(Sheets("BDD").[A:A], TextBox1) + 1
End Sub

BDD étant le nom de la feuille.

A+