I would like to incorporate the formula COUNTIF(A1:A472,"Zanesville") in my
macro

Zanesville would be filled in from the last row of data in the row the
formula appears

I thought something like (which doesn't work):

..Cells(i, "E").Formula = "=countif(A1:A" & LastRow & """" & _
.Cells(i - 1, "A").Value & """))"