Hi people
I am trying to write a userform with 3 textboxs for searching 3 columns for a specific data. However, my userform forzed(I think it's going in an endless loop) after it found the value. The error might be somewhere in the following code
Can someone please help me kill the bug

Set g = Columns(4).Find(What:=BswtToFind, LookAt:=xlWhole)
Do Until g.Offset(0, -1).Value = ColrToFind
g.FindNext(After:=g).Activate
Loop