Appliquer une date à un contenu de cellule

Question

Bonjour, 
Je souhaite applique une date "fixe" à un contenu d'une cellule sur excel :
exemple : si dans une cellule A1 je tape "v" je veux qu'en B1 on affiche la date à laquelle j'ai taper "v" dans A1. 
Dans la cellule B1 j'ai tapé la formule suivante : =Si(A1="v";aujourdhui();" ")
Dans la cellule B1 j'ai bien la date du jour mais quand j'utilise ce fichier un autre jour , excel "recalule" la date de jour d'ouverture du ficher c'est à dire 
si je tape "v" le 18/10  et que je réouvre mon fichier le 20/10 la date notée en B1 sera le 20/10 et non le 18/10.
Existe-t-il une fonction/option dans excel pour éviter ce problème.
Merci par avance 
cordialement
Adeline

Configuration: Windows XP / Internet Explorer 8.0

g · Answer

Bonjour, 

Dans ce cas il faut passer par le code VBA. 
Le code ci-dessous est à copier dans le module de feuille accessible par Alt+F11. 

Pour une saisie sur toute la colonne A:

Private Sub Worksheet_Change(ByVal Target As Range) 
i = Target.Row 
If Target.Column = 1 And Cells(i, 1) = "v" Then 'Saisie de v en colonne 1 
Cells(i, 2).Value = Date 'Date fixée en colonne 2 
End If 
End Sub 

Pour une saisie uniquement en A1:

Private Sub Worksheet_Change(ByVal Target As Range)
If [A1] = "v" Then 'Saisie de v A1
[B1] = Date 'Date fixée en B1
End If
End Sub

Bonne soirée.

zefade · Answer

Merci beaucoup!!!
C'est super gentil !!
Bonne Journée !! 
Cordialement 
Adeline

Appliquer une date à un contenu de cellule

2 réponses

Discussions similaires

Newsletters