Bonjour,
j'ai adapté ton code comme suit:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C2:C50")) Is Nothing Then
Target.Offset(0, -2) = Date
End If
If Not Intersect(Target, Range("C2:C50")) Is Nothing Then
Target.Offset(0, -1) = Time
End If
End Sub
et...