Listbox avec Trie ??

Salut,

Voici le code à placer dans ton userform

Private Sub UserForm_Activate()
nbr = Range('A1').CurrentRegion.Count '(ici je ne fais pas de division car il n'y a qu'une colonne, par contre si tu as plusieurs colonnes, pour connaitre le nombre de ligne, tu dois diviser par le nbr de colonne de données qui se touche directement que tu as dans ta feuille)
For x = 1 To nbr
ComboBox1.AddItem Range('A' & x).Value
ListBox1.AddItem Range('A' & x).Value
Next x
End Sub

Bonne journée.

John

Salut à tous et MERCI à John
effectivement cela me parait pas mal je vais essayer cela en utilisant Colon.count pour une division automatique
à Bientot aprés des essais et merci encore

Salut John
2 remarques à propos de currentregion.count [file name=ReListboxAvecTriJOHN.zip size=7229]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ReListboxAvecTriJOHN.zip[/file]

Salut le forum Merci John & Blunet
je persiste avec ma liste triee ,je joint un fichier bidon avec 1 feuille avec donnees et 1 Bouton pour executer le code puis 1 feuille avec 1 listbox & 1 combobox
si vous pouviez me valider vos solutions avec cet exemple cela me comblerai
Merci à vous et a + [file name=ListeTriee.zip size=15107]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/ListeTriee.zip[/file]