excel获取自身所在文件路径

=REPLACE(CELL("filename",A1),FIND("[",CELL("filename",A1)),255,)

特殊情况，比如工作簿中只有一个工作表，且工作表名称与工作簿名相同时，CELL函数返回的值为：路径\工作簿名.xlsx，因此FIND("[",CELL("filename",A1))找不到"["，出现#VALUE！错误，此时可以采用如下公式获取文件路径

=REPLACE(CELL("filename",A1),FIND("*",SUBSTITUTE(CELL("filename",A1),"\","\*",LEN(CELL("filename",A1))-LEN(SUBSTITUTE(CELL("filename",A1),"\",)))),255,)