質問: ExcelVBAについて質問です。
回答: 以下の部分が問題だと思います。 Set myObj = myRange.Find(What:=KeyDate, LookIn:=xlFormulas) xlFormulasとしていますから、検索対象はセルに設定された数式である文字列になります。 なぜ数式を検索対象にするのか疑問です。通常はxlValuesでセルの値を検索対象にするのでは。 さらにxlValuesにしたとしても、KeyDateにはシリアル値が入っていますから、セルの値も基本的にシリアル値でなければ正確な検索が出来ないことになります。 セルの表示形式次第で、セルに表示されているものと、Valueとして得られるものとに乖離が生じるので、検索を掛ける時はそのあたりも注意が必要と思います。