[Excel] セルにファイル名を表示する

以下の関数をセルにコピーする。

関数の下が結果です。

■パス名付きファイル名とシート名：
=CELL("FILENAME")

E:\Document\[Excel.xlsx]Sheet

■パス名なし、ファイル名、拡張子付き：

=REPLACE(LEFT(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1))-1),1,FIND("[",CELL("filename",$A$1)),)

Excel.xlsx

or

=MID(CELL("FILENAME"),FIND("[",CELL("FILENAME"))+1,FIND("]",CELL("FILENAME"))-FIND("[",CELL("FILENAME"))-1)

Excel.xlsx

■パス名なし、ファイル名、拡張子なし：

=REPLACE(LEFT(CELL("filename",$A$1),FIND(".",CELL("filename",$A$1))-1),1,FIND("[",CELL("filename",$A$1)),)

Excel

■ドライブ名抜きパス名付きファイル名とシート名：

=RIGHT(CELL("filename"),LEN(CELL("filename"))- MAX(IF(NOT(ISERR(SEARCH("\",CELL("filename"), ROW(1:255)))),SEARCH("\",CELL("filename"),ROW(1:255)))))

Document\[Excel.xlsx]Sheet

備考：ただし、該当ファイルは、一回は保存されている必要がある。

参考サイト：http://www2.odn.ne.jp/excel/waza/file.html#SEC11

参考記事：

[Excel] セルにシート名を表示する
http://kenkitagawa.cocolog-nifty.com/blog/2010/04/excel-4779.html

[Excel] グラフタイトルに指定セルの値を表示する
http://kenkitagawa.cocolog-nifty.com/blog/2010/04/excel-c612-1.html

これを組み合わせると、ファイル名やシート名をグラフタイトルに入れることができる。

------------------

［2018/4/25 改訂］

１部修正し、結果を追加。図を追加しました。