XL 2019 Code VBA figer une durée en fonction d'une cellule

[Andry Tojo]

Bonjour à tous

Je suis nouveau sur le forum, et je voulais vous demander votre aider pour savoir comment figer une cellule(contenant une formule avec la fonction Maintenant()) en fonction d'une cellule.

Dans la colonne F, j'ai des listes (Reçu, en traitement, Répondu). Et dans la colonne G, une durée (en jour, heure et minute) qui est issu d'une formule calculé en fonction de la fonction Maintenant. Et je voudrais bien figer les cellules de G quand il est marqué "répondu" dans F.

Et que ce code s'applique jusqu'au deux centième ligne environ (ou bien à toutes les lignes du tableau si possible)

Ci-joint un fichier excel en guise d'application

 

[soan]

Bonjour Andry Tojo,

Voici ton fichier modifié :

 

[danielco]

Bonjour,

J'ai mis le code dans le module de la feuille :

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 6 And Target.Value = "Répondu" Then
    Application.EnableEvents = False
    Target.Offset(, 1).Value = Target.Offset(, 1).Value
    Application.EnableEvents = True
  End If
End Sub

La macro s'exécute automatiquement quand tu mets "Répondu" en colonne F.

Daniel

 

[Andry Tojo]

danielco et soan: Un grand merci à vous Que ce soit l'un ou l'autre, je suis satisfait de vos réponse. J'espère pouvoir aussi bien maîtriser les codes VBA que vous après ma petite formation autodidacte

 

[danielco]

Je suis aussi autodidacte... Si tu as besoin d'explications sur le code, n'hésite pas.

Daniel