一、提取文件所在的路徑:
在A1單元格輸入公式=CELL("filename")
公式返回結(jié)果如圖1:
圖 1
這個公式得到的信息包含了當前工作表的名稱,且文件名是用“[ ]”括起來的。
如果不想要這些信息,只要文件路徑名,公式改為:
=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
五、提取當前文件名和工作表的名稱
公式如下:
=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)系,如果有需求,拿來即用。