Bonjour à tous,
J'ai un petit problème :
J'ai une listbox MultiSelect et je voudrais supprimer uniquement les lignes sélectionnées mais ça me supprime toute les lignes.
Voici mon code :
Dim c As Integer
For c = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(c) Then
Feuil13.Select
Cells.EntireRow.Delete
End If
Next c
Merci d'avance pour votre aide
GREG
J'ai un petit problème :
J'ai une listbox MultiSelect et je voudrais supprimer uniquement les lignes sélectionnées mais ça me supprime toute les lignes.
Voici mon code :
Dim c As Integer
For c = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(c) Then
Feuil13.Select
Cells.EntireRow.Delete
End If
Next c
Merci d'avance pour votre aide
GREG