Excel セルにファイル名やワークシート名を表示させる
以前、Excelのセルにファイル名やワークシート名を表示させる方法があることを知って驚いたけど、忘れてしまったので、再度調べ直してしまった。忘れないようにメモします。
次の関数で、ファイルパスとワークシート名が取得できました。
=CELL("filename",A1)
関数の結果、セルには次のような文字列(ファイルパス+"["+ファイル名+"]"+シート名)が表示されました。
C:\Documents and Settings\xxx\デスクトップ\[book1.xls]Sheet1
で、ファイル名だけ、シート名だけ取り出すためには、次のようにします。
ディレクトリ付きファイル名
=LEFT(CELL("filename",A1),FIND("]",CELL("filename",A1)))
ディレクトリなしファイル名
=MID(CELL("filename",A1),FIND("[",CELL("filename",A1))+1,FIND("]",CELL("filename",A1))-FIND("[",CELL("filename",A1))-1)
シート名
=RIGHT(CELL("filename",A1),LEN(CELL("filename",A1))-FIND("]",CELL("filename",A1)))