Bonjour à vous tous,
Voila mon soucis du jour !
j'ai inserer une listbox sur une feuille
A chaque demarrage, la taille de cette listbox diminue !
definie au debut pour faire apparaitre 5 lignes, je n'en ai plus qu'une !
Comment faire pour remedier à ce probleme ?
Autre soucis, j'utilise pour cette listbox le code suivant :
Dim i As Integer, J As Integer
With Feuil1.lb1
For i = 0 To .ListCount - 1
For J = 0 To .ListCount - 1
If .List(i) < .List(J) Then
temp = .List(i)
.List(i) = .List(J)
.List(J) = temp
End If
Next J
Next i
End With
qui est censé me classer les entrées par ordre alpha.
Le probleme c'est que ma listbox comporte 4 colonnes et que ce code ne trie que la premiere colonne en laissant les autres tel quelle !!!!
D'ou un melange d'info sympathique.
Si quelqu'un a, pour ca aussi une solution ...
Voila mon soucis du jour !
j'ai inserer une listbox sur une feuille
A chaque demarrage, la taille de cette listbox diminue !
definie au debut pour faire apparaitre 5 lignes, je n'en ai plus qu'une !
Comment faire pour remedier à ce probleme ?
Autre soucis, j'utilise pour cette listbox le code suivant :
Dim i As Integer, J As Integer
With Feuil1.lb1
For i = 0 To .ListCount - 1
For J = 0 To .ListCount - 1
If .List(i) < .List(J) Then
temp = .List(i)
.List(i) = .List(J)
.List(J) = temp
End If
Next J
Next i
End With
qui est censé me classer les entrées par ordre alpha.
Le probleme c'est que ma listbox comporte 4 colonnes et que ce code ne trie que la premiere colonne en laissant les autres tel quelle !!!!
D'ou un melange d'info sympathique.
Si quelqu'un a, pour ca aussi une solution ...