Recherche sur couleur de cellule

Quand tu auras mis ton premier message en conformité avec le règlement, inspire-toi de ce qui suit.

Dim Cell As Range

 
For Each Cell In Range("C1:C10")

    If Cell.Interior.ColorIndex = 3 Then

        MsgBox "J'ai trouvé une cellule jaune : " & Cell.Address

 
 
    End If

Next

Bonjour,

je souhaite faire une recherche sur la couleur d'une cellule.

Il faut que si il détecte la couleur indexcolour 6, il s'arrête sur la ligne et fasse la suite des étapes que je vais lui dire.

J'avais pour espoir de pourvoir utiliser :

nligne = 1 

 
Sheets("conseiller" ).Cells(nligne, 1).Select 

Do Until Sheets("conseiller" ).Cells(nligne, 1).Interior.ColorIndex = 6 

nligne = nligne + 1 

Loop

mais visiblement ca ne fonctionne

Pouvez-vous m'aider

merci

Tu aurais pu modifier ton premier message, comme ça :


Et pour ce qui est de ma proposition de code ?

(Excuse-moi, je mélange allègrement la rigueur absolue du modérateur et l'envie de t'aider du simple membre)

merci de ta réponse

j'avoue que mon problème est que je n'ai pas toutes les connaissance du VBA et donc j'utilise ce que je sais et me souviens (je ne l'utilise pas tous les jours donc ca se perd)
Pour expliquer le plus clairement possible mon problème :
Je réinjecte des données sans un fichier global et je souhaite faire des comparatifs comparé au données déjà présente dans le fichier global. Il s'agit d'un fichier de nom et d'adresse principalement, avec compte rendu de visite.
les lignes de couleurs sont là pour me permettre de les identifier plus facilement mais suite à cela je dois comparer plein de renseignements comparé à la ligne qui suit pour voir si il y ades changements à apporter.
avec la formule que tu me propose je n'arrive pas bien à faire des comparatifs par rapport à des cellules proches. Je suppose qu'il faut dans ce cas utiliser offset ou qqch du style mais je ne sais plus trop