dindin
XLDnaute Occasionnel
Bonjour le forum
j'ai une BD adhérent avec N° d'adhérent qui commence par XXX/001
Comment faire pour incrementer ce N° depuis un textbox à chaqu ouverture du l'userform de 1 à chaque fois
ex : XXX/001
XXX/002
XXX/003
il faut que ce N° s'affiche automatqiuement dans le textbox afin que j'évite de retourner à la base pour rajouter 1 au N° dernier.
il faut que mon code récupere la valeur inscrite en A6 et lui rajoute un pour le Nouveau N° adhérent
Voilà mon qui fonctionne mal
For i = L To M Step 1
L = Sheets("BD1").Range("A65536").End(xlUp).Row
M = Sheets("BD1").Range("A65536").End(xlUp).Row + 1
tb_nadherent.Value = "XXX/ " & M - 4
Next i
Ce code récupère le N° de la ligne vide ,donc c'est faut pour moi.
merci pour votre aide
j'ai une BD adhérent avec N° d'adhérent qui commence par XXX/001
Comment faire pour incrementer ce N° depuis un textbox à chaqu ouverture du l'userform de 1 à chaque fois
ex : XXX/001
XXX/002
XXX/003
il faut que ce N° s'affiche automatqiuement dans le textbox afin que j'évite de retourner à la base pour rajouter 1 au N° dernier.
il faut que mon code récupere la valeur inscrite en A6 et lui rajoute un pour le Nouveau N° adhérent
Voilà mon qui fonctionne mal
For i = L To M Step 1
L = Sheets("BD1").Range("A65536").End(xlUp).Row
M = Sheets("BD1").Range("A65536").End(xlUp).Row + 1
tb_nadherent.Value = "XXX/ " & M - 4
Next i
Ce code récupère le N° de la ligne vide ,donc c'est faut pour moi.
merci pour votre aide