incrémetation de numero de ligne Résolu/Fermé

Question

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



Configuration: Windows / Firefox 52.0

cs_Le Pivert · Answer

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

-NoeGo- · Answer

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-

Incrémetation de numero de ligne

2 réponses

Discussions similaires

Newsletters