Incrémetation de numero de ligne

Résolu
cedric0715 Messages postés 265 Statut Membre -  
cedric0715 Messages postés 265 Statut Membre -
bonjour
j'ai cré un userform voir fichier
je n'arrive pas du tous a que chaque ligne dans l'onglet tableau quand je valide mon userform il place un en colonne B un numéro
exemple '000001'
et qu'a chaque nouvelle ligne il incrémente
Merci de votre aide
https://www.cjoint.com/c/GKqmNQujUev



A voir également:

2 réponses

cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

comme ceci, mais il faudra changer le format des cellules de la colonne B pour que les 0 s'affichent

With ThisWorkbook.Worksheets("TABLEAU")
 l_info = .Cells(.Rows.Count, 2).End(xlUp).Row + 1


      
      .Range("B" & l_info).Value = "0000" & l_info - 2


https://www.lecfomasque.com/excel-personnalisez-vos-formats-de-cellules/

@+ Le Pivert
0
-NoeGo- Messages postés 55 Statut Membre 11
 
Bonjour,

Je pense que rajouter cette ligne dans le code associé au formulaire fonctionnera :
.Range("B" & l_info).FormulaLocal = "=SI(ESTNUM(B" & l_info - 1 & ");B" & l_info - 1 & "+1;1)"


Le SI permet de faire fonctionner le fichier pour la première ligne.

Ensuite pour que le format de la cellule soit du type 00000001 puis 00000002, il est plus pratique de le changer directement sur le fichier :

Ajouter autant de 0 qu'il le faut.

Bonne journée,
-NoeGo-
0
cedric0715 Messages postés 265 Statut Membre
 
merci a vous
0