Bonjour,
Supprime tes formules en E:F et essaie avec cette version :
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 2 Or Target.Column = 3 And Target.Row > 26 Then
If Target.Offset(, 3) = "" Then
Application.EnableEvents = False
Target.Offset(, 3) = Now
Application.EnableEvents = True
End If
End If
End Sub
Normalement le code de bernard ne devrait pas planter même s'il manquait des trucs.
Tu as peut-être un pb avec tes mises à jour.
eric