boucle en while

**arsenic1** · 22/05/2012, 15h14

Bonjour,

J'ai une macro qui fait une boucle en While.
J'aurais besoin que ma condition soit jusqu'à ce que la case soit en fond blanc.

Code :

1
2
3
4
5
While user <> 
user = Sheets("Suivi").Cells(i + 1, 8)
Sheets("Suivi").Cells(i, 10) = 1
i = i + 1
Wend

Pourriez vous me dire comment écrire ma condition?

Merci pour vos réponses.

**jackborogar** · 22/05/2012, 15h23

Tant que la case a un fond blanc ou tant que la case soit vide de valeur?

**arsenic1** · 22/05/2012, 15h27

Tant que la case est différente d'un fond blanc.

**jackborogar** · 22/05/2012, 15h48

Code :

1
2
3
4
5
While Sheets("TA FEUILLE").Range("TA PLAGE").Interior.ColorIndex<>x
 
      Ton code
 
Wend

Donc tu remplaces le x par le numéro de couleur, je pense que le blanc est 0 sinon cherche le tableau des couleurs

boucle en while [XL-2010]