Boucle sur couleur de mise en forme

Temjeh · 30 Juin 2015

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 · 30 Juin 2015

Re : Boucle sur couleur de mise en forme

Bonjour,

peut être ainsi :

Code:

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

bonne journée
@+

Temjeh · 30 Juin 2015

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 · 30 Juin 2015

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...

Code:

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

Temjeh · 30 Juin 2015

Re : Boucle sur couleur de mise en forme

Merci

Ou est mon erreur

Voir la PJ, reconnais aussi les blanches

Temjeh

Pierrot93 · 30 Juin 2015

Re : Boucle sur couleur de mise en forme

Re,

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

Boucle sur couleur de mise en forme

Temjeh

XLDnaute Accro

Pierrot93

XLDnaute Barbatruc

Temjeh

XLDnaute Accro

Pierrot93

XLDnaute Barbatruc

Temjeh

XLDnaute Accro

Pièces jointes

Pierrot93

XLDnaute Barbatruc

Discussions similaires