J'aimerais ecrire la date dans une cellule après avoir saisi des données

[jclaudej]

Bonsoir,

J'aimerais écrire la date dans une cellule après avoir saisi des données dans une autre cellule.

Par exemple : lorsque je saisi une valeur dans la cellule A1 j'écris automatiquement la date à laquelle j'ai saisi cette valeur dans la cellule B1.

Cela ne semble pas compliqué mais je suis sec

Merci d'avance pour votre aide et please essayez d'être basic car je suis basic


@ suivre.................................

 

[cj welch]

Re : J'aimerais ecrire la date dans une cellule après avoir saisi des données

salut

voici une solution.
A1 pour ecrire la valeur
En B1 tu écris =SI(A1>0;AUJOURDHUI();"") format de cellule de b1 (date)

A+

 

[abc]

Re : J'aimerais ecrire la date dans une cellule après avoir saisi des données

Bonsoir,
essaye le code
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then 'écrit dans la colonne A
Target.Offset(0, 1) = Date 'alors mets la date du jour dans la colonne a coté

End If

End Sub

A +

 

[blord]

Re : J'aimerais ecrire la date dans une cellule après avoir saisi des données

Bonjour à tous,

Une solution macro :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("B1") = Format(Date, "yyyy-mm-dd")
End Sub

À placer dans la feuille de code de l'onglet concerné

Commentaire sur la formule de cj welch :

Je modifierais la condition pour =SI(A1<>"";AUJOURDHUI();"")
ce qui signifie, si A1 différent de vide....

Benoit Lord

 

[bleck]

Re : J'aimerais ecrire la date dans une cellule après avoir saisi des données

Bonjour a tous,

J ai aplique la formule : =SI(A1<>"";AUJOURDHUI();"") qui me va parfaitement, le seul probleme c est que le jours suivant toutes les dates du jour precedent s actualisent. J aimerais pouvoir garder les dates correspondant au jours d ecriture pour chaque cellules.
Merci pour votre aide
Francis