Ajouter une date à une ligne

Bonjour

j'ai une base de données sous excel

qui est accessible aux membres du groupe sur un espace en réseau.

Je souhaiterais faire une journalisation des données

- afficher la date et l'heure dans la ligne active et toujours dans la même colonne lorsque je modifie n'importe quelle cellule de cette ligne.

J'ai adapté ce code mais le résultat s'affiche à la cellule + 8 (dans ce cas)

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Intersect(Target.Rows, Columns("A:F")) Is Nothing Then

If Target <> "" Then

Target.Offset(0, 8) = Now

End If

End If

End Sub

Merci de l'aide

L'heure doit s'afficher dans quelle colonne ?

n'importe laquelle pour autant que ce soit la même

bonjour

he oui j'ai cherché

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns("b:F")) Is Nothing Then
If Target <> "" Then
Target.Offset(0, "" & "-" & Target.Column - 1) = Now
End If
 End If

End Sub

cordialement

pour date en col A

Géant!! merci

re

tu parles ;jy connais rien en vba ; j'ai passer au moins une heure a deboguer

bonne nuit

Bonjour

Encore merci j'ai testé ce matin et il apparaît que ce serait mieux si je pouvais afficher l'heure dans la dernière colonne.

j'ai essayé de changer les paramètres sans succès

merci encore