Bonjour,

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 :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Me.ChoixSociete.Value = Format(Me.ChoixSociete.Value, "0000000000")
mais ça n'a rien changé.

ci dessous le code complet :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
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