EOleException （メッセージ 'WorksheetFunction クラスの Match メソッドが失敗しました。'

およよ～

エクセルに該当値がないとエラーが生成されました

例外をスルーして対処。

エラー値を返してくれたらいいのに。

try
// 失敗すると例外が発生するみたい
myResult := TargetSheet.Application.WorksheetFunction.Match(TargetID , myRange , 0);
except
end;