Bonjour à tous

j'ai un petit souci avec une macro, j'ai vu un post similaire à mon problème mais je n'arrive pas à l'adapter à ma situation, quelqu'un peut il me donner un coup de pouce svp?

voici ma macro:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Worksheet_Change(ByVal Target As Range)
      If Target.Count > 1 Then Exit Sub
   If Target.Column <> 12 Then Exit Sub
   If Target.Row < 4 Then Exit Sub
   Target.Offset(0, 8) = Date
   Target.Offset(0, 8).Value = Target.Offset(0, 8).Value
End Sub
 
Private Sub Worksheet_Change(ByVal Target As Range)
      If Target.Count > 1 Then Exit Sub
   If Target.Column <> 11 Then Exit Sub
   If Target.Row < 4 Then Exit Sub
   Target.Offset(0, 9) = Date
   Target.Offset(0, 9).Value = Target.Offset(0, 9).Value
End Sub
Je vous remercie par avance