A
Alex
Guest
bonjour !!
Comment faire pour obtenir une combobox triée??
Je l'initialise mais je voudrait qu'il soit rangé par ordre alphabétique
Worksheets("personnel").Select 'sélectionne la feuille ou la combobox est présente
For i = 0 To 70
If Range("a2").Offset(i, 0) <> "" And Range("a2").Offset(i, 0).Interior.ColorIndex <> 15 Then
Sheets("personnel").ComboBox1.AddItem (Range("a2").Offset(i, 0))
Else
End If
Next
Merci d'avance
Comment faire pour obtenir une combobox triée??
Je l'initialise mais je voudrait qu'il soit rangé par ordre alphabétique
Worksheets("personnel").Select 'sélectionne la feuille ou la combobox est présente
For i = 0 To 70
If Range("a2").Offset(i, 0) <> "" And Range("a2").Offset(i, 0).Interior.ColorIndex <> 15 Then
Sheets("personnel").ComboBox1.AddItem (Range("a2").Offset(i, 0))
Else
End If
Next
Merci d'avance