シート名をセルに表示したいとき

例：A2のセルにシート名を表示する

=RIGHT(CELL("filename",A2),LEN(CELL("filename",A2))-FIND("]",CELL("filename",A2)))

解説：
=CELL("filename",A2)　で、以下のようにファイル名がフルパスで表示

D:\---\---\[---.xlsx]@@@

@@@の部分がシート名なので、
直前の　]　の位置を検索して、全文字数から引く
それが右端からの文字数になるので
RIGHTで切り出す