普通に
set FoundCell = Worksheet("sheet1").Range("A1:A50").CurrentRange.Find(What:="OK")
とやると、
A1:A50に値がそのまま入ってる場合は検索できるが、
何らかの条件式が入力してあると、式を検索してしまい検索結果が出ない。
そこで、.Find(What:="OK", LookIn:=xlValue) と、明示的に値を検索させることで、
数式の結果から検索を掛けられる。
ちなみに、VBAを使わないとけっこうややこしい、複数の検索結果の取り扱いも、
set FoundCell2 =Worksheet("sheet1").Range("A1:A50").CurrentRange.FindNext(FoundCell)
で1つずつ次の結果を代入していくことができ、便利便利。