curulis57 a écrit :
Salut Chiijah,
quelque chose me dit que ça va te plaire à 100%!
Tu cliques sur la ligne concernée et ...pouf!...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'
Rows(Target.Row).Delete shift:=xlUp
'
End Sub
A+
Salut Curulis,
Merci de ta réponse.
C'est vrai que sa ma plaît plus bien, mais le souci c'est que ma feuille avec les données ne sera pas visible et qu'elle possédera énormément de lignes.
Du coup peut-on améliorer le code afin d'ajouter la condition :
Valeur (date) cocher dans le UserForm(supprUserForm) afin d'obtenir Cellule "A"=Vrai pour supprimer ?
A+