Tri alpha dans une combobox (userform)

Bonjour,

j'ai dans mon formulaire une combobox que j'utilise pour appeler dans mon userform la ligne du tableau que je veux modifier.

je voudrais que la combobox trie par ordre alphabétique dans mon userform (et non pas dans la feuille).

d'ailleurs, même quand je tri alpha la colonne nom de mon tableau, la combobox n'affiche pas les noms par ordre alpha.

Est-ce que quelqu'un aurait un code à me soumettre s'il vous plait?

je me perds un peu là...

merci beaucoup

Bonsoir

Pour ne pas compliquer trop ton code tu vas être obligé de trier ta feuille

Tu as des infos qui tiennent compte de l'index des combobox a0 = Me.CmbNom.ListIndex + 4 et

.ListIndex = Me.CmbNom.ListIndex cela complique la macro car lors d'un tri ces index de la ComboBox ne pointeront plus sur les mêmes données

Modifies ta macro Ini (ligne surlignée)

  
  ' .
  ' .
  ' .
  'Pour éviter les fash d'écran pour le select ci dessous
  Application.ScreenUpdating = False
  WS.Select 'On sélectionne la feuille sinon bug si elle ne l'est pas
  WS.Range("A4:M" & L).Sort Key1:=Range("B4"), Order1:=xlAscending, Header:=xlNo 'Le Sort

  For I = 4 To L             'Boucle départ 4 (Ligne 4 de la feuille, jusqu'à dernière
  ' .
  ' .
  ' .

Bonjour

Merci banzai64

Je vais tester ça dans la journée

Mag

bonsoir !

merci ça marche !

il suffisait de mettre la bonne colonne à trier !

B4 au lieu de A4 et c'est parfait

  WS.Range("A4").Sort Key1:=Range("b4"), Order1:=xlAscending, Header:=xlGuess 

un grand merci Banzai64.

@+

Mag