Bonjour tout le monde

Voila le petit probleme du jour

J'ai créé une petit macro qui permet de parcourir une feuille de calcul et a chaque foi que je rencontre une cellule avec un fond de couleur rouge, cette cellule resoit un commantaire

voici le bou de code qui fait sa :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
If Sheets(nom_feuille).Cells(compteur_ligne, compteur_colonne).Interior.ColorIndex = 3 Then 
    Cells(compteur_ligne, compteur_colonne).Select
    Cells(compteur_ligne, compteur_colonne).AddComment
    Cells(compteur_ligne, compteur_colonne).Comment.Visible = True
    Cells(compteur_ligne, compteur_colonne).Comment.Text Text:="prévoir remplacement"
End If
les compteur ligne et colone son pour des boucle POUR afain de parcourir toute mes lignes

par contre mon probleme c'est que a partir du moment ou j'ai exécuter une premiere foi ma macro, si je décide de rajouter le fond rouge a dotre cellules et de reéxécuter ma macro, sa plante

a mon avis c'est a cause du fait que il veut remetre un commentaire sur une cellule deja commenter.

comment peut ton verifier si une cellule a un commentaire ou non??
ou sinon au débu de ma macro je lui dit suprimer tout les commentaire de cette page

comment faire l'un ou l'otre??

merci de votre aide