If Range(Cells(i, 5)) < Worksheets("Validation").Range("$A$21") Then
oughta be
If .Cells(i, 5).Value < Worksheets("Validation").Range("$A$21").value Then