Date et Heure

Fermé
Phoenix1979 - 23 oct. 2018 à 15:19
fabien25000 Messages postés 673 Date d'inscription mercredi 5 octobre 2016 Statut Membre Dernière intervention 28 juillet 2022 - 23 oct. 2018 à 16:31
Bonjour,

Je voudrais acter la date et l'heure de saisie d'une donnée dans la cellule suivante.
Ex:
A1: Bonjour; B1: Date et Heure de la saisie de A1

Merci de la réponse
Belle journée

2 réponses

DjiDji59430 Messages postés 4052 Date d'inscription samedi 19 avril 2008 Statut Membre Dernière intervention 26 mai 2024 648
23 oct. 2018 à 16:13
Bonjour,
Une façon de faire :

en B1 control et point-virgule un espace control et 2 points
0
fabien25000 Messages postés 673 Date d'inscription mercredi 5 octobre 2016 Statut Membre Dernière intervention 28 juillet 2022 59
23 oct. 2018 à 16:31
Bonjour une variante en VBA
Alt+F11, cliquer sur visualiser le code et coller le code ci dessous :

Private Sub Worksheet_Change(ByVal Target As Range)

If Not Application.Intersect(Target, Range("A:A")) Is Nothing Then
    Target.Offset(0, 1) = Format(Now, "dd/mm/yyyy") & " à " & Format(Time, "hh:mm:ss")
End If

End Sub

0