bonjour Nevil
bonjour vekmort
pour confirmer teste cette macro:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Set isect = Application.Intersect(Target, Range('I1:I65536'))
If (isect Is Nothing) Then
MsgBox ('double click sur une cellule en dehors de la colonne I')
Else
MsgBox ('double click sur une cellule de la colonne I')
End If
End Sub