Afficher date et heure si données
Résolu/Fermé
A voir également:
- Afficher date et heure si données
- Afficher date et heure sur écran d'accueil ✓ - Forum Samsung
- Afficher mot de passe wifi android - Guide
- Formule excel si date supérieur à une autre date ✓ - Forum Excel
- 35 go internet équivalent en heure ✓ - Forum Mobile
- Convertir heure en centième excel ✓ - Forum Excel
2 réponses
skk201
Messages postés
938
Date d'inscription
jeudi 11 septembre 2008
Statut
Membre
Dernière intervention
16 octobre 2016
54
21 juil. 2014 à 14:53
21 juil. 2014 à 14:53
C'est uniquement possible avec des macros.
Si vous voulez je vous dis comment faire.
Si vous voulez je vous dis comment faire.
jc80
Messages postés
4149
Date d'inscription
mardi 5 février 2013
Statut
Membre
Dernière intervention
25 février 2019
1 422
21 juil. 2014 à 14:54
21 juil. 2014 à 14:54
Bonjour
Essaie avec cette formule
=SI(A1="";"";MAINTENANT())
Cordialement
Essaie avec cette formule
=SI(A1="";"";MAINTENANT())
Cordialement
skk201
Messages postés
938
Date d'inscription
jeudi 11 septembre 2008
Statut
Membre
Dernière intervention
16 octobre 2016
54
21 juil. 2014 à 15:13
21 juil. 2014 à 15:13
Si tu fais ça, cela va te donné la date et l'heure actuel. Comme une horloge
Je pense que ce que nemi veux c'est que la cellule garde l'heure du moment de la modification.
Je pense que ce que nemi veux c'est que la cellule garde l'heure du moment de la modification.
via55
Messages postés
14402
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 avril 2024
2 702
21 juil. 2014 à 15:42
21 juil. 2014 à 15:42
Bonjour
Dans ce cas il faut passer par une macro
Alt F11 pour ouvrir l'éditeur
Selectionner dans l'arborescence la feuille concernée
Copier et coller la macro suivante :
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Cells(Target.Row, 2) = Now
End Sub
Cdlmnt
Dans ce cas il faut passer par une macro
Alt F11 pour ouvrir l'éditeur
Selectionner dans l'arborescence la feuille concernée
Copier et coller la macro suivante :
Private Sub Worksheet_Change(ByVal Target As Range)
ActiveSheet.Cells(Target.Row, 2) = Now
End Sub
Cdlmnt
skk201
Messages postés
938
Date d'inscription
jeudi 11 septembre 2008
Statut
Membre
Dernière intervention
16 octobre 2016
54
21 juil. 2014 à 16:24
21 juil. 2014 à 16:24
@via55 Il veut que ça soit lors de la modification de la colonne A :) faut le intersect
@ Nemi
Est-ce que ça ne serai pas plus intéressant que la date de dernière modification apparaisse comme un commentaire de la cellule en question ?
Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A:A")) Is Nothing Then ActiveSheet.Cells(Target.Row, 2) = Now End If End Sub
@ Nemi
Est-ce que ça ne serai pas plus intéressant que la date de dernière modification apparaisse comme un commentaire de la cellule en question ?
via55
Messages postés
14402
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 avril 2024
2 702
21 juil. 2014 à 16:29
21 juil. 2014 à 16:29
@skk201 Tu as parfaitement raison, j'avais zappé l'histoire de la colonne A