If c.Column = 23 Then
c.Offset(, -22).Resize(, 7).Copy Range("a3")
If MsgBox("Are you sure to validate?", vbOKCancel, "Confirmation") = vbOK Then
' code si réponse=OK , sinon inutile de tester pour ne rien faire derrière
End If
End If
If c.Column = 24 Then
c.Offset(, -23).Resize(, 7).clear content
If MsgBox("Are you sure to validate?", vbOKCancel, "Confirmation") = vbOK Then
' code si réponse=OK , sinon inutile de tester pour ne rien faire derrière
End If
End If