Excel如何取得文件的文件名？

1.如果是要获得工作簿的文件名可以用以下函数公式 =MID(CELL("filename"),FIND("[",CELL("filename")) 1,FIND("]",CELL("filename"))-FIND("[",CELL("filename"))-1) 2.如果是想获得工作簿中工作表名可以用以下函数公式 =MID(CELL("filename"),FIND("]",CELL("filename")) 1,99) 或者=REPLACE(CELL("filename"),1,FIND("]",CELL("filename")),"") 用vba的方式也可以达到这个目的 1.获取当前工作簿名写在单元格A1中 Sub wbname() Cells(1, 1) = ThisWorkbook.Name End Sub 2.获取当前工作簿所有工作表名，写入A列 Sub wsname() Dim sht As Worksheet, i% For Each sht In Worksheets i = i 1 Cells(i, 1) = sht.Name Next End Sub