Probleme reconnaissance couleur dans boucle sur mise en forme conditionnelle

Attila451

XLDnaute Occasionnel
Bonjour,
Je cherche à comparer 2 colonnes, si il y a des différences, les cellules colonne A sont en rouge.
La macro se base sur la couleur rouge colonne A et va chercher la bonne valeur colonne B qui est affectée colonne A et met la colonne A en vert ensuite.

Jusque la, pas de problème par contre, quand j'active une mise en forme conditionnelle, avec rouge si différence, j'ai l'impression que la macro ne reconnait pas la couleur rouge de la mise en forme conditionnelle.

J'ai fais un test avec l'enregistreur de macro et le code affecté pour la mise en forme conditionnelle est
With Selection.FormatConditions(1).Interior
.PatternColorIndex = xlAutomatic
.Color = 255
.TintAndShade = 0
End With

ma condition est RGB( 255, 0, 0):

Sub recupcouleurs()
Dim Num_lig As Long
Num_lig = 1

While Cells(Num_lig, 1) <> ""
If Cells(Num_lig, 1).Interior.Color = RGB(255, 0, 0) Then
Cells(Num_lig, 1) = Cells(Num_lig, 2)
Cells(Num_lig, 1).Interior.Color = RGB(96, 255, 64)

End If

Num_lig = Num_lig + 1
Wend

End Sub
 

Fichiers joints

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas