Boucle sur couleur de mise en forme

[Temjeh]

Bonjour et merci d'avance

Après quelques recherches, je vous solicite.

J'avais le code dans ma base mais je ne le trouve plus.

J'ai vu sur le net une fonction qui semble compliqué.

La cell deviens verte sous condition

Je veut boucler sur cette couleur

For i = 4 To 27
If Range("L" & i).FormatConditions(1) = RGB(146, 208, 80) Then Exit For
Next i

MsgBox i:


... pas bon

Merci de votre temps

Temjeh

 

[Pierrot93]

Re : Boucle sur couleur de mise en forme

Bonjour,

peut être ainsi :

If Range("L" & i).FormatConditions(1).Interior.Color = RGB(146, 208, 80) Then Exit For

bonne journée
@+

 

[Temjeh]

Re : Boucle sur couleur de mise en forme

Merci beaucoup

J'avais assayé ce code mais sans succès

Même les sans couleurs de fond les reconnaient comme verte

A+

Temjeh

 

[Pierrot93]

Re : Boucle sur couleur de mise en forme

Bonjour,

testé chez moi sous 2010, le code ci dessous fonctionne et vérifie bien le test...

If Range("A1").FormatConditions(1).Interior.Color = RGB(255, 0, 0) Then MsgBox "ok"

 

[Temjeh]

Re : Boucle sur couleur de mise en forme

Merci

Ou est mon erreur

Voir la PJ, reconnais aussi les blanches

Temjeh

 

[Pierrot93]

Re : Boucle sur couleur de mise en forme

Re,

Aarf chez moi fonctionne, dans ton fichier le test sur A2 est bien vérifié...