TheProdigy
XLDnaute Impliqué
Bonjour tout le monde,
J'ai réussi à appliquer un code qui supprime une ligne sélectionnée d'une listview.
Mon problème est que la suppression se fait même en ne sélectionnant aucune ligne le bouton est actif et supprime une ligne que je n'ai pas sélectionnée.
quand je sélectionne une ligne et que je valide la suppression cela fonctionne parfaitement mais quand je ne sélectionne aucune ligne et que je valide cela supprime une ligne que je ne connais pas laquelle
Normalement, il doit bloquer et me dire "Attention il faut sélectionner la ligne à supprimer"
Merci de m'aider
J'ai réussi à appliquer un code qui supprime une ligne sélectionnée d'une listview.
VB:
Private Sub CommandButton2_Click()
Dim Nbligne As Integer
If Me.ListView1.ListItems.Count = 0 Then
Exit Sub
Else
Nbligne = Me.ListView1.SelectedItem.Index
Maligne = Nbligne + 1
' Me.CommandButton1.Locked = False
' Me.CommandButton2.Locked = False
End If
If MsgBox("Voulez-vous valider cette opération?", vbYesNo, "Validation") = vbYes Then
Sheets("Annuaire").Rows(Maligne).EntireRow.Delete
MsgBox ("La ligne a été supprimée avec succés")
Unload Me
UsfListView.Show
End If
quand je sélectionne une ligne et que je valide la suppression cela fonctionne parfaitement mais quand je ne sélectionne aucune ligne et que je valide cela supprime une ligne que je ne connais pas laquelle
Normalement, il doit bloquer et me dire "Attention il faut sélectionner la ligne à supprimer"
Merci de m'aider