XL 2016 Indication de date de modification de cases dans une ligne

[leeroy]

Bonjour,
Je souhaite créer un VBA qui indique la date de modification de case appartenant à une ligne. Les explications n'étant pas forcément simple, veuillez trouver ci-joint un exemple.
Merci par avance,
Leeroï

 

[Hasco]

Bonjour,

Dans le fichier joint, un click-droit sur le nom de l'onglet puis 'Visualiser le code' vous amènera vers :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B1:F10")) Is Nothing And Target.Count = 1 Then Cells(11, Target.Column) = Date
End Sub

Bon après-midi

 

[leeroy]

Merci beaucoup