XL 2010 Tenir compte des zéro lors du chargement du combobox

[Aragon10]

Bonjour le Forum,

Je trouve un problème d'affichage des valeurs qui commencent par zéro dans le combobox. par exemple 0045688215 s'affiche uniquement 45688215.J'ai ajouté sur le userform initialize mais ça n'a rien changé.:
# Me.ChoixSociete.Value = Format(Me.ChoixSociete.Value, "0000000000") #

ci dessous le code complet :

Set f = Sheets("Feuil2")
choix1 = Application.Transpose(f.Range("B3:B" & f.[a65000].End(xlUp).Row).Value)
Me.ChoixSociete.List = choix1
ligneEnreg = f.[a65000].End(xlUp).Row + 1
Me.ChoixSociete.SetFocus
Me.ChoixSociete.Value = Format(Me.ChoixSociete.Value, "0000000000")

Merci pour votre aide.

 

[youky(BJ)]

Bonjour Aragon,
Utilisez la propriété .Text au lieu .Value
Set f = Sheets("Feuil2")
choix1 = Application.Transpose(f.Range("B3:B" & f.[a65000].End(xlUp).Row).Text)
Non testé
Bruno