slt

j'ai plus cellule avec ou sans commentaire.
Je voudais faire une boucle pour savoir si la cellule selectionnée contient ou pas de commentaires.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
 
  variable = Cells(k, ProjectListAdrCol + 1).Comment.Text
 
If variable <> "" Then
....
end if

Mon problème est que ça plante à chaque fois et je n'ai aucune autre solution.


Merci d'avance.