.FindNext error

[MartinLiss]

I have this code where rngFound is a range. When I run it Excel highlights .FindNext and tells me "Method or data member not found". I've used .FindNext before without any problems. Why now?

 
    With Sheet1       
        For lngRow = lngLastRowT To 2 Step -1
            Do
                Set rngfound = wsWFD.Columns("E").Find(.Cells(lngRow, "E"), LookIn:=xlValues, LookAt:=xlWhole)
                If Not rngfound Is Nothing Then
                    strFirstAddress = rngfound.Address
                    wsWFD.Cells(rngfound.Row, "A").EntireRow.Delete
                    Set rngfound = .FindNext(rngfound)
                    intCount = intCount + 1
                End If
            Loop Until rngfound.Address = strFirstAddress
        Next
    End With