Listbox avec Trie ??

Georgio

XLDnaute Nouveau
Salut à tous MERCI Creepy pour ta reponse d'Hier
Comment remplir une listbox ou combobox dans userform avec une feuille trier
Merci d'avance et @+
 

john

XLDnaute Impliqué
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
 

Blunet

XLDnaute Occasionnel
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]
 

Pièces jointes

  • ReListboxAvecTriJOHN.zip
    7.1 KB · Affichages: 36

Georgio

XLDnaute Nouveau
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]
 

Pièces jointes

  • ListeTriee.zip
    14.8 KB · Affichages: 45

Statistiques des forums

Discussions
312 438
Messages
2 088 406
Membres
103 842
dernier inscrit
ho9999