trier listbox

J

jean-paul

Guest

• 10 Février 2006

• #2

Ne tenez pas compte de ce post
Il est tronqué
Je voulais dire que Vba me renvoie un code erreur 70 lors de l'entrée dans la boucle if
Il refuse de faire.list(y,2)=.list(x,2)

 

Vote positif 0 Vote négatif

Luki

XLDnaute Accro

• 10 Février 2006

• #3

Bonsoir jean-paul,

Quelle est ta question?
:ermm:

 

Vote positif 0 Vote négatif

J

jean-paul

Guest

• 10 Février 2006

• #4

listbox à quatre colonnes
je voudrais faire trier ma liste en fonction de la colonne 1 ou 2 ou 3 ou 4.
Question : comment faire pour créer un tableau multi-dimension afin de monter en mémoire ma listbox et faire le tri alpha sur une des colonnes.

Est-ce assez clair

 

Vote positif 0 Vote négatif

Charly2

Nous a quittés en 2006

Repose en paix

• 11 Février 2006

• #5

Bonsoir Jean-Paul et Luki

Tu es certain du code ? Je trouve étrange que l'on mélange des couples (i,j) et (x,y), d'autant que i et j sont déclarés mais pas x et y...

Par ailleurs, je ne vois pas trop l'intérêt de tranférer un tableau dans un autre pour faire un tri

Dim i%, j%
Dim Temp$
'
  With ComboBox1
    For i = 0 To .ListCount - 2
      For j = i + 1 To .ListCount - 1
        If .List(i, 2) › .List(j, 2) Then
          ' bien mettre i et j au lieu de x et y
          Temp = .List(j, 2)
          .List(j, 2) = .List(i, 2)
          .List(i, 2) = Temp
          ' idem pour les autres colonnes...
        End If
      Next j
    Next i
  End With

Cliquez pour agrandir...

Reviens sur ce fil si ton problème persiste

A+

Message édité par: Charly2, à: 11/02/2006 01:09

 

Vote positif 0 Vote négatif

J

jean-paul

Guest

• 15 Février 2006

• #6

Merci pour ta réponse

J'ai repris le problème depuis le début

c.a.d.

reconstrution de ma listebox en faisant une recherche avec .find en fonction de mon critère et inserion dans la listebox.

ainsi ma listebox se présente sous la forme voulue

merci pour le coup de main

 

Vote positif 0 Vote négatif