VBA comparer 2 wkb meme valeur même couleur ligne

Bonjour,

Chaque jour on fait une extraction d'articles urgents (numeros dans colonne F) d'une base de donnée, la taille du tableau peut varier d'un jour sur l'autre. Les lignes traitées sont manuellement mises en couleur chaque jour. Le lendemain dans la nouvelle extraction, j'aimerais que les articles traités la veille (quelques lignes mises manuellement en couleur selon l'équipe) et toujours en cours (dont présents dans la nouvelle liste) soient mis en valeur avec leur ligne colorée.
L'idéal serait que le classeur qui comporte la macro soit dédié au transfert et permettre d'ouvrir le classseur 1 puis le 2, de faire l'effet miroir pour les valeurs en F similaires avec la couleur si la ligne est colorée et qu'elle indique le nombre d'articles communs et le nombre d'articles aux lignes colorées commun, le tout en évitant d'écraser par erreur les lignes colorées du classeur de la veille. Mais ce n'est pas obligé.
Pour l'instant j'ai ça:

Sub chercherCellule()
    Dim last_row_wkAr      As Range
    Dim last_row_wkDep     As Range
    Dim next_row_target    As Range
   
    Set last_row_wkAr = ws_wkAr.Cells(Application.Rows.Count, 1).End(vbUp).EntireRow
    Set last_row_wkDep = ws_wkDep.Cells(Application.Rows.Count, 1).End(vbUp).EntireRow
    Set next_row_target = ThisWorbook.Worksheets(1).Cells(Application.Rows.Count, 1).End(vbUp).Offset(1).EntireRow

       Dim row_wkAr        As Range
       Dim row_wkDep       As Range
    
       For Each row_wkAr In ws_wkAr.Range(ws_wkAr.Cells(4, 6), last_row_wkAr)
            For Each row_wkDep In ws_wkDep.Range(ws_wkAr.Cells(4, 6), last_row_wkAr).Rows
               If row_wkAr.Cells(1).Value = row_wkDep.Cells(1).Value Then

                    row_wkAr.Cells(1).Interior.Color = row_wkDep.Cells(1).Interior.Color
    
                    Set next_row_target = next_row_target.Offset(1)
                End If
    
            Next
        Next

End Sub

Voilà le type de liste :
Est-ce possible?
Merci d'avance