Format texte pour textbox

[Marco60]

Bonsoir le forum,

J'ai un petit problème de format.

Dans une textbox, je dois entrer des N° de lot qui commence par 0 (EX: 0000111111).

Seulement, lorsque je valide les données, les 0 n'apparaissent pas dans le tableau.

J'ai tenté : Range('A1').Value = Format(TextBox1.Value, '0000000000') Mais sans succès.

Je pense qu'il faudrait déclarer une variable 'as string' mais comme une textbox est 'as string' par défaut, je ne sais plus quoi faire.

Merci de votre aide

Marc

 

[ccpapy]

bonsoir, en mettant un ' avant tes 10 zéros
:unsure: à essayer

 

[_Thierry]

Bonsoir Cpapy, Marco

Une autre approche :

Private Sub CommandButton1_Click()

    With Range('A1')
        .NumberFormat = '@'
        .Value = CStr(TextBox1)
    End With
End Sub

Bonne nuit
[ol]@+Thierry[/ol]