VBA INSTRREV 関数は、文字列内で最初に見つかった値の位置に対応する整数を右から返します。
InStrRev 関数は、一致するものが見つからない場合は 0 を返します。
InStrRev(テキスト, 値)
また
InStrRev(テキスト、値、開始番号、大文字と小文字)
テキストの右側から検索を開始して、XLP 値の位置を特定します。
Sub InStrRevExample() text = "参照: XLP-54-21-XLP-9" '検索時の本文中の「XLP」の先頭位置が右側になります position = InStrRev(text, "XLP") MsgBox position '戻り値: 17 End Sub