listbox avec 5 caractères

[apamemkes]

Bonjour le forum

J'utilise une macro de se cher Jacques et j'aimerai le modifier pour avoir 5 caractères dans une listbox à plusieurs valeurs.
affichage de la listbox 1100, dans la base la valeur est 01100. cela est-il possible?

Merci

 

[Roland_M]

Re : listbox avec 5 caractères

bonsoir,

--- dans UserForm_Initialize() rajouter la boucle For I = 0
'Me.ListBox1.List = Range("client").Resize(, 4).Value
'For I = 0 To Me.ListBox1.ListCount - 1
' Me.ListBox1.List(I, 0) = Right("00000" & Me.ListBox1.List(I, 0), 5)
'Next

--- dans TextBox1_Change()
'TextBox1.Value = Right("00000" & TextBox1.Value, 5)
'
--- et à la place de c.Format(ListBox1.Value, "0####")
'Me.ListBox1.List(I, 0) = Right("00000" & Me.ListBox1.List(I, 0), 5)

 

[apamemkes]

Re : listbox avec 5 caractères

Bonsoir Roland

Merci pour la réponse.