J
Jean P.
Guest
Bonjour à tous
Grâce à l'aide des gens du forum j'ai appris plusieurs choses mais j'ai encore une fois besoin de votre aide.
Situation:
A) J'utilise Windows XP Professionnel
B) J'utilise Excel 2003 SP1
C) J'ai un classeur qui contient 5 feuilles.
D) J'ai fais un USF avec un ListBox qui me permet de visualiser les données d'un tableau (Feuille 5)
Question:
Est-il possible de sélectionner une ligne dans le ListBox pour la supprimer (et ce faisant la supprimer aussi dans le tableau de la feuille 5) ?
Voici ce que j'avais trouvé comme code:
Private Sub CommandButton2_Click()
If ListBox1.ListCount >= 1 Then
If ListBox1.ListIndex = -1 Then
ListBox1.ListIndex = ListBox1.ListCount - 1
End If
ListBox1.RemoveItem (ListBox1.ListIndex)
End If
End Sub
Mais cela ne fonctionne pas ...
Je vous remercie pour votre aide et vos commentaires.
Jean P.
Grâce à l'aide des gens du forum j'ai appris plusieurs choses mais j'ai encore une fois besoin de votre aide.
Situation:
A) J'utilise Windows XP Professionnel
B) J'utilise Excel 2003 SP1
C) J'ai un classeur qui contient 5 feuilles.
D) J'ai fais un USF avec un ListBox qui me permet de visualiser les données d'un tableau (Feuille 5)
Question:
Est-il possible de sélectionner une ligne dans le ListBox pour la supprimer (et ce faisant la supprimer aussi dans le tableau de la feuille 5) ?
Voici ce que j'avais trouvé comme code:
Private Sub CommandButton2_Click()
If ListBox1.ListCount >= 1 Then
If ListBox1.ListIndex = -1 Then
ListBox1.ListIndex = ListBox1.ListCount - 1
End If
ListBox1.RemoveItem (ListBox1.ListIndex)
End If
End Sub
Mais cela ne fonctionne pas ...
Je vous remercie pour votre aide et vos commentaires.
Jean P.