Arrêt d'une boucle while sur couleur de cellule

Phillip

XLDnaute Occasionnel
Bonjour,

Une question qui paraît simple mais que je n'arrive pas à résoudre.

Je veux arrêter ma macro lorsque ma cellule est d'une certaine couleur (ici la couleur 34) , et cela ne marche pas.

Voici mon extrait de code :

Code:
'C'est sur la ligne suivante que ça plante
While  Cells(premignedeb1, 4).Interior.ColorIndex <> 34
        
        rubrique = Cells(premlignedeb1, 2).Value
        mrubrique = Cells(premlignedeb1, 3).Value
        Sheets("Stats").Activate
        Cells(premligstat, 1).Value = rubrique
        Cells(premligstat, 2).Activate
        ActiveCell.Value = montantrubrique
               
 
        
premlignedeb1 = premlignedeb1 + 1
premligstat = premligstat + 1
Sheets("prim").Activate

Wend

Merci de vos lumières car j'ai toujours du mal avec ces boucles while sur les conditions NON réalisées !
 

Discussions similaires

Réponses
25
Affichages
915

Statistiques des forums

Discussions
312 502
Messages
2 089 022
Membres
104 006
dernier inscrit
CABROL