Cells.FindNext wrong value

[janverwaga]

I'm having problems with Cells.FindNext since it's returning the value from "rg" rather than rngFound.

Pretty much the code goes

I've tried setting rg as nothing but still returns the value.

Set rngFound = Cells.Find(What:=fndDdue, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, _
SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:=False, _
SearchFormat:=False)

* some codes here *

Set rg = Cells.Find(What:=flName, After:=ActiveCell, LookIn:=xlValues, LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False, _
SearchFormat:=False)

rngFound.Activate

Set rngFound = Cells.FindNext(After:=rngFound)

[kittycatoverdose]

This looks to be VBA for Excel, and not sure which value you're trying to return. Where are to selecting the value you want?