Listbox... item sélectionné

Le
José
Bonsoir,
Pourriez vous m'indiquer le code à placer dans un CommandButton pour que
chaque fois que je valide ce bouton, l'item sélectionné passe au suivant.
Merci d'avance pour vos réponses.
José
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #5076391
Bonsoir.
Arrivé en bas d ela liste, on repart en début de liste :
Private Sub CommandButton1_Click()
If ListBox1.ListIndex + 1 = ListBox1.ListCount Then
ListBox1.ListIndex = 0
Else
ListBox1.ListIndex = ListBox1.ListIndex + 1
End If
End Sub
Cordialement.
Daniel
"José" 474f1228$0$23252$
Bonsoir,
Pourriez vous m'indiquer le code à placer dans un CommandButton pour que
chaque fois que je valide ce bouton, l'item sélectionné passe au suivant.
Merci d'avance pour vos réponses.
José




LSteph
Le #5076361
Bonsoir,

Private Sub CommandButton1_Click()
With ListBox1
If .ListIndex < .ListCount - 1 Then
.ListIndex = .ListIndex + 1
Else
.ListIndex = 0
End If
End With

End Sub

'lSteph

Bonsoir,
Pourriez vous m'indiquer le code à placer dans un CommandButton pour que
chaque fois que je valide ce bouton, l'item sélectionné passe au suivant.
Merci d'avance pour vos réponses.
José




Publicité
Poster une réponse
Anonyme