如何取得工作表名

主要基于exceltip[综合应用] 如何取得工作表名。
有多种方法，下面介绍三种方法：
1. 工作表函数CELL方法：
=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,99)
其中99是工作表名的字符数，必须大于或等于工作表名的长度。
注：使用本方法，文件必须先保存，否则返回空值。
2. 宏表函数GET.DOCUMENT方法：
定义名称（<Ctrl+F3>）shName，下面的几种实现方式都可以，由于get.document/workbook(1)返回的是形如“[文件名.xls]工作表名”的信息，无非是去掉工作表名前信息的问题。比较来看，replace简洁度更高。
=REPLACE(GET.DOCUMENT(1),1,FIND("]",GET.DOCUMENT(1)),)&T(NOW())
=RIGHT(GET.DOCUMENT(1),(LEN(GET.DOCUMENT(1))-FIND("]",GET.DOCUMENT(1))))&T(NOW())
=MID(GET.WORKBOOK(1),FIND("]",GET.WORKBOOK(1))+1,20)
单元格中输入=shName
关于宏表函数，参考excelhome[分享]常用宏表函数选 ，无限学习中。
t(now())返回的是空值，主要作用是实时更新数据。参考GET.CELL函数的刷新
关于T 函数：语法T(value)，如果value是文本或引用了文本，T 将返回值。如果值未引用文本，T 将返回空文本 ("")。
3. 自定义函数方法：
按<Alt+F11>→插入模块→粘贴下面的代码
Function GetShName()
    Application.Volatile
    GetShName = Application.Caller.Parent.Name
    ‘单元格的parent母对象其工作表sheet
End Function
单元格输入=GetShName()