Сравнение двух таблиц по одному столбцу

Нужно:
сравнивать старый и новый файл по столбцу «F» на предмет появления в новом файле новых значений (строк), которых нет в старом и выделять эти значения цветом.

Решение:
Закрасить ячейки в новом файле, туда добавить ячейки из старого файла и удалить дубликаты.

Option Explicit
 
Public Sub Строки_Новые_Цвет()
  Dim shDest As Worksheet, shSour As Worksheet, Row_Last As Long
 
  Workbooks.Open ThisWorkbook.Path & "\Новый.xlsx"
  Set shDest = ActiveWorkbook.Worksheets("Лист2")
 
  With shDest
    .UsedRange.Interior.ThemeColor = xlThemeColorAccent6
    Row_Last = .[a1].CurrentRegion.Rows.Count + 1
 
    Workbooks.Open ThisWorkbook.Path & "\Старый.xlsx"
    Set shSour = ActiveWorkbook.Worksheets("Лист2")
    shSour.[a1].CurrentRegion.Copy .Cells(Row_Last, 1)
 
    ActiveWorkbook.Close False
 
    With .Cells(1, 1).CurrentRegion
      .RemoveDuplicates Columns:=6, Header:=xlNo
    End With
  End With
  MsgBox "Строки_Новые_Цвет", vbOKOnly, "Всё !"
 
End Sub