Auto incrément 3 digits

[Pierwak]

Bonjour, je cherche a réaliser une macro de numérotation automatique. Les numéros doivent être de la forme XXXXXX001, XXXXXX002, etc... Les X repésentent une chaine de caractères qui est toujours la même. Faire l'auto incrément ne me pose pas de problèmes, c'est seulement pour laisser les 3 digits (001) dans le numéro que je ne vois pas comment faire.
Merci d'avance a tous ceux qui se pencheront sur le problème.

 

[PascalXLD]

Re : Auto incrément 3 digits

Bonjour

essaies

Sub toto()

For x = 1 To 100
Range("A" & x) = "xxxxxxx" & Format(x, "000")
Next

End Sub

Cela te donnera peut-être des idées

 

[jmd2]

Re : Auto incrément 3 digits

hello

sans macro :

format de cellule nombre personnalisé, tu tapes 000

j'ai vu ça dans le forum ya pas longtemps

 

[Pierwak]

Re : Auto incrément 3 digits

Merci à vous deux, j'ai utilisé l'instruction format dans ma macro comme conseillé par pascal et ca marche nickel.

Une fois de plus pour XLD hip hip hip !!!!