一,、提取文件所在的路徑：

在A1單元格輸入公式=CELL("filename")

公式返回結(jié)果如圖1：

圖 1

這個公式得到的信息包含了當(dāng)前工作表的名稱，且文件名是用“[ ]”括起來的,。

如果不想要這些信息,，只要文件路徑名，公式改為：

=SUBSTITUTE(LEFT(CELL("filename"),FIND("]",CELL("filename"))-1),"[","")

公式返回結(jié)果如圖2：

圖 2

二,、提取文件名（含后綴）：

方法一：函數(shù)與公式

公式如下：

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

公式返回結(jié)果如圖3：

圖 3

方法二：用宏表函數(shù)定義名稱

點擊“公式”→“名稱管理器”，引用位置輸入公式=get.cell(66,A1),，如圖4：

圖 4

在A1單元格輸入公式=文件名,，即可得到圖2結(jié)果。

方法三：VBA代碼

按快捷鍵【Alt+F11】進入VBE編輯環(huán)境,，輸入以下代碼：

Sub 宏1()

[A1] = Mid(ThisWorkbook.Name, InStrRev(ThisWorkbook.Name,"\") + 1)

End Sub

再按快捷鍵【F5】執(zhí)行宏,，A1單元格就出現(xiàn)圖2結(jié)果。

圖 5

三,、提取文件名（不含后綴）：

公式如下：

=MID(CELL("filename"),FIND("[",CELL("filename"))+1,FIND(".xls",CELL("filename"))-FIND("[",CELL("filename"))-1)

公式返回結(jié)果如圖6：

圖 6

四,、提取工作表名稱：

公式如下：

=RIGHT(CELL("filename",$A$1),LEN(CELL("filename",$A$1))-FIND("]",CELL("filename",$A$1)))

公式返回結(jié)果如圖7：

圖 7

五、提取當(dāng)前文件名和工作表的名稱

公式如下：

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

要將公式作為數(shù)組公式輸入,，請按【Ctrl+Shift+Enter】

數(shù)組公式返回結(jié)果如圖8：

圖 8

也許你會說這些公式我不懂,，沒關(guān)系，如果有需求,，拿來即用,。