Left関数、Right関数を使った両サイドの抜粋は結構あるのですが、
中間だけの抜き出しが調べても見つけられなかったので。

 

例えば、こんな感じに抜粋したいときは以下の手順になると思います。

1.アンダーバー(_)までの文字数を調べる。
2.mid関数でアンダーバー以前をカットする。
3.ドット(.)までの文字数を調べる。
4.left関数で名前までを引き抜く。

 

■サンプルコード

 

★ちょこっと解説

・各変数時点での値
A → 12345_田中一郎.xlsx
B → 6
C → 田中一郎.xlsx
D → 5
E → 田中一郎

 

・各関数について
InStr → 特定文字の検索が行えます。(左から何文字目にあるか。)
       =InStr(”元の文字列”,”検索したい文字列”)

Mid → 文字列の途中を抜き出す。
         =Mid(”元の文字列”,”何文字目から取り出すか”,”何文字取り出すか”)

Left → 左から指定文字数目までを取り出す。
        =Left(”元の文字列”,”取り出したい文字数”)