Excel 如何取得文件的文件名
发布网友
发布时间：2022-04-21 17:58
共1个回答
热心网友
时间：2023-07-26 22:59
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
