For Each . in Selection

Bonjour,

J'ai écris le code suivant

Code:

---

1 2 3 4 5 6

Sub commentTZ() Dim Cel As Range For Each Cel In selection Cel.AddComment (TestZéro(ActiveCel)) Next Cel End Sub

---

il ne fonctionne pas. l'erreur est la suivante : erreur de compilation fonction ou variable attendue...
visiblement il y a un problème au niveau du selection

Pouvez vous m'aider ?

Merci beaucoup

Bonjour
1) - que viennent faire des parenthèses ici ? :

Code:

---

Cel.AddComment (TestZéro(ActiveCel))

---

2) qu'est la procédure TestZéro, dont on ignore le code ?

3)

Citation:

---

visiblement il y a un problème au niveau du selection

---

"visiblement" tu n'as rien compris à ce qu'attend (une chaîne de caractères) l'utilisation de la méthode AddComment -->> ouvrir d'urgence ton aide VBA à la rubrique Range.AddComment, méthode

Salut,

et ActiveCell avec 2 l :)

ah je ne savais pas qu'il ne fallait pas mettre de parenthèses...il y en a dans mon cours..

Testzéro affecte "reçu" à la cellule si elle est supérieure à 10 et "non reçu" sinon, voici le code :

Code:

---

1 2 3 4 5 6 7 8

Property Get TestZéro(Cellule As Range) As String Select Case Cellule.Value Case Is < 10 TestZéro = "pas recu" Case Else TestZéro = "recu" End Select End Property

---

le terme rien compris est un peu fort....mais bon...

surtout que TestZéro renvoie bien une chaine de caractère....

par contre effectivement ce n'est pas ActiveCell mais Cel ! Désolé j'avais fait quelques modification pour faire des test suite à cette erreur et j'ai oublié de d'enlever cette modification.

Bien.
Tu aurais du au moins signaler dès ton tout premier message que Testzéro était une fonction et qu'elle renvoyait bien une valeur de type string. Prends cette bonne habitude.
Résolu, alors ?

Bonjour,
De ce que je vois le problème ne vient pas du code, les parenthèse bien qu'inutile ne porte pas a conséquent de ton cas!
L'histoire d'ActiveCell est une erreur de résonnement pas de code!
Quelle est la provenance du fichier?

Si quand tu écris selection et que la première lettre le s en occurrence reste minuscule il y a un problème!