Hello,
j'ai regardé un peu ta demande.
en gros si je comprends bien, dans le fichier que tu me proposes, tu voudrais recopier les cellules de ton tableau en colonne H contenant une MFC dans une autre colonne (par exemple la K), en gardant uniquement la couleur rouge si la cellule de la colonne H est en rouge puisque la date est erronée par rapport à la colonne G.
Pour ça tu utilises un SI faisant apparaître le mot "ROUGE" en colonne I, puis une MFC colorant ta cellule en Rouge si le mot apparaît.
Je suis donc parti de ce constat pour te faire la proposition suivante. Puisque le mot Rouge apparaît, il suffit de mettre la condition de la coloration de l'intérieur de la cellule par rapport à l'apparition à ce mot et recopier simplement le text repris dans la colonne H.
En gros, regarde la petite macro suivante et dit moi si c'est ça.
Option Compare Text
Dim i As Integer
Sub CopierCol()
For i = 2 To 181
Cells(i, 11).Value = Cells(i, 8).Value
If Cells(i, 9).Text = "Rouge" Then Cells(i, 11).Interior.Color = RGB(255, 0, 0)
Next
End Sub
je l'ai mise dans le fichier joint.
cordialement,
Rékiss