エクセルVBAでの文字列抽出

質問

エクセルVBAで文字列を検索して、検索した文字列を他のセルへ出力する方法がわかる方法を探しております。状況を図で説明すると、

A1セル：aaa\bbb\item1\ddd
A2セル：aaa\bbb\ccc\item2\ddd
A3セル：aaa\bbb\ccc\ddd\item3\eee

このような状態からitemを検索して、B1セルに

B1セル：item1
B2セル：item2
B3セル：item3

と表示させたいです。エクセルVBA初心者な者でRegExpを使うのかな、というところまではたどり着きましたが、そこから先にすすめません。
何か良い方法をご存知の方、教えていただきたいです。よろしくお願いいたします。

回答No.1

higekuman · ベストアンサー

私ならば、Instr関数とMid関数を使います。

まずは、Instr関数で、文字列の何文字目にitemがあるのかを探し、
次に、またInstr関数で、文字列の中のitem以降で最初に出てくる\の位置を調べ(すなわち何文字分を取り出すのかを調べる)、
最後に、Mid関数で、文字列のどの位置から何文字取り出すかを指定して、
希望の文字列を取り出します。