monter ou descendre les valeurs dans une listbox

[nikoVB]

Bonjour ,

Voilà j'aimerai, grace a un commandbouton 'bt1', remonter
d'un cran la ligne selectionnée dans
mon 'listbox1' ,pourriez vous m'eclairer un peu svp !
Merci d'avance

(ensuite je me debrouillerai pour les faire descendre )


Niko

 

[Zon]

Salut,

C'est ce genre de truc que tu veux ? à mettre dans l'évènement click de ton bouton.

Dim Item
On Error Resume Next
With ListBox1
Item = .List(.ListIndex)
.List(.ListIndex) = .List(.ListIndex - 1)
.List(.ListIndex - 1) = Item
.Selected(.ListIndex - 1) = True
End With
On Error GoTo 0


A+++

 

[nikoVB]

Re: monter ou descendre le contenud'une ligne dans une listbox

oui a peu pres mais en fait j'aimerai 'deplacer' egalement le contenu de ma ligne desoler si je me suis mal formulé.

Merci tout de meme , en tout cas cela marche tres bien et je v garder ton code pour la suite...

 

[Zon]

Re: monter ou descendre le contenud'une ligne dans une listbox

Re,

de quelle ligne tu parles ????

 

[nikoVB]

Re: monter ou descendre le contenud'une ligne dans une listbox

de ma ligne selectionnée...