3xceln4ute XLDnaute Occasionnel 23 Mai 2017 #1 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
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é.
DoubleZero XLDnaute Barbatruc 23 Mai 2017 #2 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 Vote positif 0 Vote négatif
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 25 Mai 2017 #3 DoubleZero à dit: 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 Cliquez pour agrandir... Bonjour DoubleZéro, Forum, Merveilleux ! Une solution efficace ! Je te remercie grandement Au plaisir ! Vote positif 0 Vote négatif
DoubleZero à dit: 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 Cliquez pour agrandir... Bonjour DoubleZéro, Forum, Merveilleux ! Une solution efficace ! Je te remercie grandement Au plaisir !