请教：在单元格中能否获取工作表名

playyun

又学到一种方法：

插入-名称 - 定义  A=SUBSTITUTE(GET.DOCUMENT(1),"["&GET.DOCUMENT(88)&"]",)&T(NOW())

在任一单元格输入：  =TEXT(A,"@")就可以了

只是在第5张工作表任一单元格中如何自动获取第二张及第三张工作表名？

slc

谢谢1楼和6楼

现在我把100多个工作表名称列了出来了！！！！！！！！！！！！！

livewire

Sub get_active_sheet_name()

ActiveCell = ActiveSheet.Name

End Sub