Solution pour un problème VBA Excel.
Résolu
2pax.cruz
-
Yoskopolite Messages postés 83 Date d'inscription Statut Membre Dernière intervention -
Yoskopolite Messages postés 83 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
j'ai un soucis en VBA excel. En fait, je n'arrive pas à voir comment je pourrais faire...
Je vous explique :
J'ai une liste en excel, que l'utilisateur rempli avec un formulaire. J'aimerais permettre à l'employé de supprimer des lignes facilement, sans devoir faire clic-droit supprimer.
Je vous remercie.
j'ai un soucis en VBA excel. En fait, je n'arrive pas à voir comment je pourrais faire...
Je vous explique :
J'ai une liste en excel, que l'utilisateur rempli avec un formulaire. J'aimerais permettre à l'employé de supprimer des lignes facilement, sans devoir faire clic-droit supprimer.
Je vous remercie.
A voir également:
- Solution pour un problème VBA Excel.
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Trier un tableau excel - Guide
- Déplacer colonne excel - Guide
- Si ou excel - Guide
4 réponses
Il te suffit (par le code) de sélectionner une des cases de la ligne concernée (dans mon exemple ci-dessous, ça sera A1) et de lui demander de supprimer toute la ligne :
Range("A1").EntireRow.Delete
Oui, ça je sais. Mais je ne sais pas comment je peux faire pour qu'il selectionne la ligne et qu'elle se supprime...
Merci.
Merci.
Je me suis mal exprimé, le code que je t'ai indiqué s'occupe de supprimer la ligne sans avoir à la sélectionner.
Mais j'ai peut-être pas tout compris à la question :-D
PS : si tu veux que l'utilisateur sélectionne une ligne et clique sur un bouton pour la supprimer, le code du bouton sera alors :
Mais j'ai peut-être pas tout compris à la question :-D
PS : si tu veux que l'utilisateur sélectionne une ligne et clique sur un bouton pour la supprimer, le code du bouton sera alors :
Activecell.EntireRow.Delete
Merci pour vos réponses.
J'ai mis un bouton sur ma page. L'utilisateur sélectionne une cellule et lorsqu'il clique, la ligne se supprime.
Mais comment puis-je faire une msgbox qui demande de confirmer la suppression de la ligne. De plus, j'aimerais savoir afficher la contenu de la première colonne dans la msgbox.
Merci encore.
J'ai mis un bouton sur ma page. L'utilisateur sélectionne une cellule et lorsqu'il clique, la ligne se supprime.
Mais comment puis-je faire une msgbox qui demande de confirmer la suppression de la ligne. De plus, j'aimerais savoir afficher la contenu de la première colonne dans la msgbox.
Merci encore.
J'ai réussi. Merci encore.
Je mets le code pour ceux que ça intéresse ou que ça pourrait aider :
Sub SuppressionLigneProjet()
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column
Texte = Cells(Ligne, 1)
Dim Reponse
Reponse = MsgBox("Are you sure that you want to delete the project : '" & Texte & "'", vbYesNo + vbExclamation, "Delete confirmation")
Select Case Reponse
Case vbYes 'si clic sur oui
Cells(Ligne, 1).EntireRow.Delete shift:=xlUp
Case vbNo 'Si le bouton cliqué est non
'on ne fait rien et la msgbox se ferme
End Select
End Sub
Je mets le code pour ceux que ça intéresse ou que ça pourrait aider :
Sub SuppressionLigneProjet()
Ligne = ActiveCell.Row
Colonne = ActiveCell.Column
Texte = Cells(Ligne, 1)
Dim Reponse
Reponse = MsgBox("Are you sure that you want to delete the project : '" & Texte & "'", vbYesNo + vbExclamation, "Delete confirmation")
Select Case Reponse
Case vbYes 'si clic sur oui
Cells(Ligne, 1).EntireRow.Delete shift:=xlUp
Case vbNo 'Si le bouton cliqué est non
'on ne fait rien et la msgbox se ferme
End Select
End Sub