Inserting blank values in

Sub notclass()
Dim c, SrchRng As Range
Application.ScreenUpdating = 0
Set SrchRng = Range("A2:C" & Range("E" & Rows.Count).End(xlUp).Row)
    For Each cel In SrchRng
       If cel = "" Then cel.Value = "Not Classified"
    Next
    Application.ScreenUpdating = True
End Sub