Inserer date de fin lors que la tâche est terminé

Bonjour,

Je suis assez novice en vba, j'aimerai trouvé le code qui permet d'inscrire la date d'aujourd'hui quand la tâche est terminé.

Dans mon tableau dans la colonne C, j'ai un menu déroulant, lorsque que je choisi terminé, j'aimerai que dans la colonne G, on inscrive la date d'aujourd'hui.

Pouvez-vous m'aider?

Bonjour toutes et tous

@Singele, un petit aperçu simple avec l'événement change de la feuille du classeur @tester ^{et à améliorer}

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
 On Error Resume Next
Application.EnableEvents = False
Cells(Target.Row, "G") = Date
If Cells(Target.Row, "C") = "Terminé" Then
Cells(Target.Row, "C") = Target.Value
ElseIf Cells(Target.Row, "C") = "En cours…" Then
 Cells(Target.Row, "G") = ""
ElseIf Cells(Target.Row, "C") = "No comment." Then
 Cells(Target.Row, "G") = ""
ElseIf Cells(Target.Row, "C") = "" Then
 Cells(Target.Row, "G") = ""
End If
Application.EnableEvents = True

End Sub

Explications:

• Création d'une liste déroulante se nommant INFOS voir Feuil2 pour la liste déroulante sur la feuil1 colonne C du classeur ^{(pour y répertorier les mots comme : Terminé, En cours... etc.}
• lors de l'utilisation de la liste déroulante si le mot Terminé a été sélectionné ^{ou tapé} dans a colonne G, la date se place dans la ligne adéquate ^{Date longue}
• si dans cette liste C aucun mot/valeur n'est inscrit, rien ne s'inscrira dans la ligne de la colonne G pour la date
• j'ai ajouté une MFC mise en forme conditionnelle ^{(facultative)}

crdlt,

André

Merci ça fonctionne parfaitement