Des zéros dans textbox

Bonsoir, encore une fois j’ai besoin de votre lumière.

J’ai cette ligne pour alimenter une textbox dans mon formulaire

Me.TextBox1.Value = ActiveWorkbook.Worksheets("BDOrdens").Range("A65536").End(xlUp).Value + 1

Dans ma feuil “BDOrdens” dans la colonne A j’ai :

00001

00002

00003

Etc.

Ce que j’aimerai c’est qu’a l’ouverture de mon formulaire la textbox1 affiche bien « 00004 » et pas seulement le « 4 » sans les zéros, une idée ?

Merci

Bonsoir,

Si dans votre colonne les chiffres vous ne les considérez pas comme des chiffres, alors sélectionnez mise en forme "texte"

le textbox les considérera alors comme du "string".

Sous excel vous verrez la différence : un chiffre est "naturellement aligné à droite, alors qu'un texte est naturellement aligné à gauche...

Donc reste à savoir si vous utilisez ce chiffre comme un chiffre ou comme une valeur "alphanumérique"

ceci dit il y a la possibilité de transformer un texte de nombre en chiffre.

@ bientôt

LouReeD

Une idée comme ça

Me.TextBox1.Value = format(ActiveWorkbook.Worksheets("BDOrdens").Range("A65536").End(xlUp).Value + 1, "00000")

Merci pour votre aide, ca ma marche bien