XL 2021 Tri alpha sur combobox à 2 colonnes

Claudinedu13

XLDnaute Nouveau
Bonjour,

A l'aide du code ci-dessous, j'affiche un combobox à 2 colonnes, ça marche très bien mais je voudrais faire un classement alpha par rapport à la colonne 1, merci si vous pouvez m'aider...

Private Sub UserForm_Activate()
With ComboBox1
.Clear
.ColumnCount = 2
.ColumnWidths = "100;140"
.List = Feuil4.Range("A2:B" & Feuil4.Range("A" & Rows.Count).End(xlUp).Row).Value
End With
End Sub

Private Sub ComboBox1_Change()
TextBox1.Value = ComboBox1.Column(0)
TextBox2.Value = ComboBox1.Column(1)
End Sub
 
Solution
Bonjour
perso dans le raisonnement je vais un peu plus loin
quand on rempli une combobox à 2 colonnes et que l'on fait un tri Alpha ou (<où > que) il convient d'ajouter une colonne a notre variable tableau(par conséquent à la listbox aussi) a fin de memoriser les index de lignes(quitte à la masquer dans le columnwiths
car le plus souvent dans un userform on retranscrit les donnée par la suite ou la colonne dans la listbow n'est qu'une partie du tableau

là encore une fois (et je m'adresse à @Dudu2) il faudra m'expliquer pourquoi passer par une sub passerelle

le quick sort 2D( la belle histoire)
je ne vais pas vous donner la mienne mais je vais vous ajouter les...

Discussions similaires

Réponses
6
Affichages
244
Réponses
2
Affichages
152

Statistiques des forums

Discussions
312 210
Messages
2 086 281
Membres
103 170
dernier inscrit
HASSEN@45