Change le commentaire modifié à chaque fois

Bonjour!

Je ne sais pas si je vais pouvoir vous l'exprimer comme il faut de manière à ce que cela soit bien claire... mais je vais essayer..

Voilà j'ai écris ce code afin de faire apparaître un commentaire selon la valeur d'une cellule. Cependant j'aimerais pouvoir modifier ce commentaire et qu'à chaque clique sur le "bouton" cela ne me réinitialise pas mon commentaire modifié par celui d'origine.
D'avance merci pour vos réponses...

Code:

---

1 2 3 4 5 6 7 8 9 10

Sub Bouton7604_Clic() Dim c As Range For Each c In Range("c5:g10") If c < 8 And Not c.Comment.Text = "CP" Then c.Comment.Text "RTT" Else On Error Resume Next c.Comment.Delete End If Next

---

Bonjour,
J'ai essayé de comprendre ce que tu veux mais avec ton code c'est pas possible, pourrais-tu expliquer ce que tu veux exactement.
A+

Merci déjà dans un premier de te pencher sur mon problème,

Voilà,

J'ai crée un tableau de gestion d'heures travaillées. Dans ce Tableau les journées complètes travaillées sont à 8 ou plus (> 8 heures), dans ce cas lorsque la journée est complète, il n'y a pas de commentaire à afficher.
Cependant, lorsque la journée comporte moins d'heures (< 8), cela signifie que l'employé a soit prit un "RTT" ou un "CP", dans ce cas on affiche un commentaire qui d'origine dans le code sera "RTT".
MAIS je veux pouvoir modifier ce "RTT" par "CP" lorsque c'est nécessaire. Le problème qui survient c'est que lorsque j'appui sur mon bouton d'actualisation (celui qui va lancer la macro), tous mes commentaire sont réinitialisés à "RTT" ... (même ceux que j'ai modifiés en "CP") :(

Voir si le classeur en annexe te convient .
A+

:ccool:

Un Grand merci pour ce code, et pour répondre à votre question, oui c'est exactement ce que je recherche...
Encore merci.:D

Content pour toi
A+