Affichage date du passage en "cloturé" dans Excel

Résolu
marie74 -  
 marie74 -
Bonjour,

Dans mon tableau excel toutes les cellules de la colonne A contient le mot "en cours" ou "clôturé". Je voudrais pouvoir garder la trace du passage en clôturé dans la colonne Q: dès que clôturé est inscrit en A, la date s'affiche en Q.

Je n'ai malheureusement aucune notion de VBA...

Merci d'avance pour votre aide.

Marie
A voir également:

4 réponses

Yoyo01000 Messages postés 1639 Date d'inscription   Statut Membre Dernière intervention   168
 
Bonjour,
En Q1 :
=SI($A1="clôturé";AUJOURDHUI();"")

Mettre format de cellule "date" en colonne Q
1
Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Bonsoir
en attendant mieux
sous réserve d'une entrée de texte avec déplacement vertical du curseur:
clic droit sur le nom de l'onglet
sélectionner "visualiser le code"
et coller ça:

Private Sub Worksheet_selectionChange(ByVal Target As Range)
If Target.Column = 1 And ActiveCell.Offset(-1, 0).Value = "Clôturé" Then
ActiveCell.Offset(-1, 16).Value = Date
End If
End Sub


crdlmnt


les accents ont évidemment leur importance, le texte dans la cellule doit être identique à celui en gras ci dessus
1
Vaucluse Messages postés 26496 Date d'inscription   Statut Contributeur Dernière intervention   6 438
 
Bonjour
AUJOURDHUI() et MAINTENAT() sont volatiles et changeront à chaque intervention sur le fichier
votre Excel doit accepter les macros
voir ci dessous via VBA:
https://mon-partage.fr/f/H1zhUGBC/
crdlmnt
0
eriiic Messages postés 24603 Date d'inscription   Statut Contributeur Dernière intervention   7 276
 
Bonjour,

code à mettre dans le module de la feuille :
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.Count > 1 Then Exit Sub
    Application.EnableEvents = False
    If Target.Column = 1 And Target.Value = "clôturé" Then Cells(Target.Row, "Q") = Date
    Application.EnableEvents = True
End Sub

La date reste si tu repasses en autre chose que "clôturé". Préciser si tu veux que ça repasse vide.
https://www.cjoint.com/c/IBqlpVAkPL6
eric

1
marie74
 
Super merci beaucoup!!!
0
marie74
 
Bonjour,

Merci à vous 2.
Je ne m'en sors pas avec le code…
J'ai essayé la fonction excel "simple" qui fonctionne, mais est ce que la date ne sera pas modifiée à chaque ouverture du fichier et en plus d'à chaque fois que l'on passe en clôturé?
0
Yoyo01000 Messages postés 1639 Date d'inscription   Statut Membre Dernière intervention   168
 
Rectificatif :

=SI($A1="clôturé";MAINTENANT();"")
0