Just add the blue line:
With Sheets("Sheet1")
n = .Range("C" & .Rows.count).End(xlUp).Row
.Range("C8:C" & n).Interior.Color = xlNone