[Résolu / DoubleZéro] Macro pour inscrire date si statut change

3xceln4ute

XLDnaute Occasionnel
Bonjour Forum,

Serait-il possible de mettre en place une macro qui permettrait d'inscrire la date (colonne E) à laquelle le statut a été mis en "Terminé" ?

À noter que c'est un tableau partagé.
 

Pièces jointes

  • Macro date de fin.xls
    176 KB · Affichages: 38

DoubleZero

XLDnaute Barbatruc
Bonjour, subirubi :), le Forum,

Comme ceci ( ? ), dans le module de l'onglet "Feuil1"... En espérant que cela fonctionne pour un fichier partagé.
VB:
Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    If c.Column = 1 And c.Value = "Terminé" And c.Count = 1 Then c(1, 5) = Date
End Sub
A bientôt :)
 

3xceln4ute

XLDnaute Occasionnel
Bonjour, subirubi :), le Forum,

Comme ceci ( ? ), dans le module de l'onglet "Feuil1"... En espérant que cela fonctionne pour un fichier partagé.
VB:
Option Explicit
Private Sub Worksheet_Change(ByVal c As Range)
    If c.Column = 1 And c.Value = "Terminé" And c.Count = 1 Then c(1, 5) = Date
End Sub
A bientôt :)
Bonjour DoubleZéro, Forum,

Merveilleux ! Une solution efficace !

Je te remercie grandement :)

Au plaisir !
 

Discussions similaires

Réponses
7
Affichages
347
Réponses
15
Affichages
665
Compte Supprimé 979
C

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T