保存済みのファイルであれば、
CELL 関数 と
FIND 関数 と
MID 関数 を用いて、
=MID(CELL("filename",Sheet1!A1),FIND("]",CELL("filename",Sheet1!A1))+1,31)
なんて方法は取れるには取れる。
ただし、新規作成して未保存状態のワークブックだと CELL("filename", ...) は空白が返って来るのでまともに動かない。
CELL("sheetname", ...) みたいなのがないってのが、かなり謎だわ。
しかし CELL("filename", Sheet1!A1) を 2 回も呼ぶのは余りにもダサ過ぎる。
因みに MID 関数の第 3 パラメータに与えている 31 は、少なくとも 2016 だとワークシート名に 31 文字制限かかっているので、そのマジックナンバー。