par double clic

[habib]

bonjour
je souhaiterai par un double clic sur une ligne la sélectionner et la supprimer.
Est possible ?
Merci à vous

 

[globinours]

bonjour habib,
essaye cette macro dans le module de ta feuille.

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Target.EntireRow.Delete
End Sub

 

[jp14]

Bonsoir

Une petite variante qui permet de protéger une zone

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

Dim ligne As Integer

ligne = Target.Row

If ligne > 2 Then ' pour protéger des lignes
Rows(ligne & ':' & ligne).Select
Selection.Delete Shift:=xlUp
End If

End Sub

 

[habib]

merci à tous les deux