I have this code I want it to do a job for me but it's not finishing it properly.
Dim eCell As Range
For Each eCell In [E5:E18]
eCell.Offset(eCell.Row-5, -1).Font.Color = eCell.Font.Color
eCell.Offset(eCell.Row-5, -3).Font.Color = eCell.Font.Color
Next eCell
The aim is...