Bonjour,
depuis une listbox (Listbox6) qui affiche tous mes articles de ma feuille « BASE PRODUITS » je clique sur mon bouton supprimer(CommandButton12) et je veux que ça me supprime la ligne entière de l’article sur lequel j’ai cliqué article dans ma feuille « BASE PRODUITS ».
J’ai tout fait. J’ai récupéré le numéro de la ligne correspondante(variable lignearticle) dans ma feuille mais je coince et je pense que c’est parce que :
1 - je n’ai pas la bonne syntaxe pour supprimer la ligne entière
2 - je suppose qu’il faut lui indiquer que la suppression doit être faite sur ma feuille.
Voici ma macro
Private Sub CommandButton12_Click()
'Récupération du libellé de l’enregistrement sélectionné
If ListBox6.ListIndex > -1 Then
lignearticle = ListBox6.ListIndex + 3
article = Sheets(« BASE PRODUITS »).Range(« C » & lignearticle)
End If
If article <> « » Then
'Demande de confirmation de la suppression
If MsgBox(« Confirmez-vous la suppression définitive de cet article ? », vbYesNo, « Demande de confirmation de suppression ») = vbYes Then
'Si réponse Oui, on supprime la ligne sur laquelle on se trouve
Rows(lignearticle).EntireRow.Delete
'on informe de la suppression de la ligne
MsgBox (« Suppression de l’article " & article & " réalisée avec succès »)
End If
Else
MsgBox (« Aucun article sélectionné. Vous devez obligatoirement choisir un article pour le modifier ! »)
End If
End Sub
J’ai volontairement pas joins tout mon projet mais je peux le faire ua besoin.
Merci de votre aide