Hide Rows based on "A"'s Criteria

[adgjqetuo]

What am I doing wrong here?

I have a code and it doesn't error out, but it won't hide the rows either. I'm pretty sure the red is what needs to be altered. I've tried adding "Selection.", "Rows." and "Cells." and none of them are working.

Sub Test()
Dim Lngrow As Long
Lngrow = Range("I5").End(xlDown).Row
Do While Lngrow > 0
If Cells(Lngrow, 1).Value = "Filler" Then
Selection.EntireRow.Hidden = True
End If
Lngrow = Lngrow - 1
Loop
End Sub