cs_Fabian123
Messages postés180Date d'inscriptionvendredi 18 janvier 2008StatutMembreDernière intervention22 novembre 2013
-
11 avril 2008 à 13:02
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 2018
-
11 avril 2008 à 23:04
Bonjour!
tout est dans la question!
j'ai une liste d'article sur une feuille excel, qui est chargée dans une listbox, la liste n'est pas triée (et je ne peux pas la trier sur la feuille...)
j'aurais donc souhaité que la listbox trie la liste par ordre alphabétique lorsqu'elle est chargée.
je sais que sur vb2005 on a la propriété 'sorted', mais je ne la trouve pas sur vba excel... est-il possible de le faire?
cs_MPi
Messages postés3877Date d'inscriptionmardi 19 mars 2002StatutMembreDernière intervention17 août 201822 11 avril 2008 à 23:04
Tu dois utiliser une double-boucle et une variable de transition.
Tu vérifies si l'élément x est > ou < que x + 1
Si >, tu places x+1 dans variable, x dans x+1 et variable dans x
ex (List1 étant le nom de ta listbox):
For i = 0 to List1.Listcount - 1
For j = i to List1.Listcount - 1
If list1.List(i) > List1.List(j) then
Variable = List1.List(i)
List1.List(i) = List1.List(j)
List1.List(J) = Variable
End If
Next
Next
Pas testé, mais ça devrait fonctionner
MPi²
Pour ceux qui programment sous Office, n'oubliez pas qu'il existe un forum dédié à ces applications VBA....... ICI