Aide sur code VBA Couleur

Bonjour,
J'aimerais insérer dans le code en complétement l'élément suivant: .Interior.Color


Option Explicit

Dim tabloC, i&, ln&

Sub Couleurs()

Application.ScreenUpdating = False
tabloC = Sheets("Logement").Range("B2:C" & Sheets("Logement").Range("B" & Rows.Count).End(xlUp).Row)
For i = 1 To UBound(tabloC, 1)
tabloC(i, 1) = Sheets("Logement").Range("B" & i + 1)
tabloC(i, 2) = Sheets("Logement").Range("B" & i + 1).Font.Color
Next i
For ln = 2 To Range("D" & Rows.Count).End(xlUp).Row
For i = 1 To UBound(tabloC, 1)
If tabloC(i, 1) = Range("E" & ln) Then
Range("B" & ln & ":F" & ln).Font.Color = tabloC(i, 2)
End If
Next i
Next ln
End Sub

Merci d'avance
M.