OVH Cloud OVH Cloud

date automatique

2 réponses
Avatar
jerome
Bonsoir,
une fois avoir entrée une donnée dans une cellule A1,
je voulais avoir la date du jour dans B1 et l'heure actuelle dans C1

J'ai essayé ca :C1=SI(A1+0;"";MAINTENANT())
mais ca ne marche pas car elle s'actualise des que je repéte l'operation
en A2 B2 C2 ( normal me direz vous:( )

avez vous une solution ?

sinon, exist'il une fonction pour copier le contenu d'une cellule
automatiquement?


l'idée est de copier a la sortie de A1
les valeus d'une cellule qui contiendrais la fonction MAINTENANT()(une
sorte d'horloge)
dans B1 et C1 ...
l'esentiel étant que l'opération se réptèe avec A2 B2 C2 sans que B1 et
C1 change...

Merci d'avance .

2 réponses

Avatar
JB
Bonsoir,

Sans VBA:

Passer en mode calcul itératif: Outils/Options/Calcul/Calcul itératif

=SI(A2="";"";SI(B2="";MAINTENANT();B2))

Avec VBA:
Clic-Droit onglet puis Visualiser code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect([A2:A65000], Target) Is Nothing And Target.Count = 1
Then
Application.EnableEvents = False
Target.Offset(0, 1) = Now
Application.EnableEvents = True
End If
End Sub

JB

Bonsoir,
une fois avoir entrée une donnée dans une cellule A1,
je voulais avoir la date du jour dans B1 et l'heure actuelle dans C1

J'ai essayé ca :C1=SI(A1+0;"";MAINTENANT())
mais ca ne marche pas car elle s'actualise des que je repéte l'operation
en A2 B2 C2 ( normal me direz vous:( )

avez vous une solution ?

sinon, exist'il une fonction pour copier le contenu d'une cellule
automatiquement?


l'idée est de copier a la sortie de A1
les valeus d'une cellule qui contiendrais la fonction MAINTENANT()(une
sorte d'horloge)
dans B1 et C1 ...
l'esentiel étant que l'opération se réptèe avec A2 B2 C2 sans que B1 et
C1 change...

Merci d'avance .


Avatar
MichDenis
Les fonctions "Maintenant() et Aujourdhui() font parti des fonctions volatiles
de base (inné) d'excel et elles ont la caractéristiques de se mettre à jour sauf
si le mode de calcul est sur "Manuel".

Pour réaliser ce que tu désires, tu dois utiliser VBA.

Voici un exemple simple que tu peux copier dans le module feuille où l'action se déroule :
'-------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)

Dim Rg As Range, c As Range
Set Rg = Intersect(Columns(1), Target)
If Not Rg Is Nothing Then
Application.EnableEvents = False
For Each c In Rg
If c <> "" Then
c.Offset(, 1).NumberFormat = "DD/MM/YYYY H:MM:SS"
c.Offset(, 1) = Now()
Else
c.Offset(, 1) = ""
End If
Next
Application.EnableEvents = True
End If

End Sub
'-------------------------------




"jerome" a écrit dans le message de news:
%23pzHgse$
Bonsoir,
une fois avoir entrée une donnée dans une cellule A1,
je voulais avoir la date du jour dans B1 et l'heure actuelle dans C1

J'ai essayé ca :C1=SI(A1+0;"";MAINTENANT())
mais ca ne marche pas car elle s'actualise des que je repéte l'operation
en A2 B2 C2 ( normal me direz vous:( )

avez vous une solution ?

sinon, exist'il une fonction pour copier le contenu d'une cellule
automatiquement?


l'idée est de copier a la sortie de A1
les valeus d'une cellule qui contiendrais la fonction MAINTENANT()(une
sorte d'horloge)
dans B1 et C1 ...
l'esentiel étant que l'opération se réptèe avec A2 B2 C2 sans que B1 et
C1 change...

Merci d'avance .