函数获取单元格中的SheetName

如果单元格A1不是空白的,我正在使用此函数在单元格中input图纸名称。 问题是,当我尝试使用此公式一次更新所有工作表时,每次重新计算时都会将所有工作表中的单元格重命名为活动工作表名称。 我如何将这个应用到所有表中的列中,以便显示'该'表名?

Function SheetName() SheetName = ActiveSheet.Name End Function 

拨打电话:

 =IF(A2="","",SheetName()) 

您可以使用Application.Caller

 Function SheetName() SheetName = Application.Caller.Parent.Name End Function 

用Excel公式替代(从https://exceljet.net/formula/get-sheet-name-only ):

 = MID(CELL("filename", A1), FIND("]", CELL("filename", A1)) + 1, 255)