Affichage date du passage en "cloturé" dans Excel
Résolu/Fermé
A voir également:
- Affichage date du passage en "cloturé" dans Excel
- Liste déroulante excel - Guide
- Mise en forme conditionnelle excel - Guide
- Si et excel - Guide
- Aller à la ligne excel - Guide
- Trier par date excel - Guide
4 réponses
Yoyo01000
Messages postés
1639
Date d'inscription
samedi 2 février 2019
Statut
Membre
Dernière intervention
7 mars 2022
166
Modifié le 15 févr. 2019 à 19:32
Modifié le 15 févr. 2019 à 19:32
Bonjour,
En Q1 :
=SI($A1="clôturé";AUJOURDHUI();"")
Mettre format de cellule "date" en colonne Q
En Q1 :
=SI($A1="clôturé";AUJOURDHUI();"")
Mettre format de cellule "date" en colonne Q
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 416
Modifié le 15 févr. 2019 à 19:29
Modifié le 15 févr. 2019 à 19:29
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
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
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 416
16 févr. 2019 à 11:55
16 févr. 2019 à 11:55
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
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
eriiic
Messages postés
24601
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
25 novembre 2024
7 243
Modifié le 16 févr. 2019 à 12:18
Modifié le 16 févr. 2019 à 12:18
Bonjour,
code à mettre dans le module de la feuille :
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
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
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é?
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é?
Yoyo01000
Messages postés
1639
Date d'inscription
samedi 2 février 2019
Statut
Membre
Dernière intervention
7 mars 2022
166
16 févr. 2019 à 11:41
16 févr. 2019 à 11:41
Rectificatif :
=SI($A1="clôturé";MAINTENANT();"")
=SI($A1="clôturé";MAINTENANT();"")