Merci pour ton aide,
Je début en VBA et cela ne fonctionne pas ..
Sub Nouvelle_donnée()
Dim j, iSct As Range
Set iSct = Intersect(Target, Range("D:D"))
If iSct Is Nothing Then Exit Sub
Application.EnableEvents = False
For Each j In iSct.Cells
If IsEmpty(j) Then
j.Offset(0, -1) = ""
Else
j.Offset(0, -1) = Format(Now, "mm/dd/yy hh:mm:ss")
End If
Next
Application.EnableEvents = True
End Sub
Dans mon cas c'est quand il y une donnée de rentrée dans la colonne A:A alors la macro doit paramétrer l'heure et la date de la saisie dans la colonne D:D
Je te suis reconnaissant de ton aide