用户定义的函数 - 此公式所在的工作表的名称

Question

这很简单,但我只是忘记了必要的代码.我想创建一个用户定义的函数,它返回函数存在的工作表的名称.

我目前拥有的:

    public Function SHEETNAME(X as integer) as String
        SHEETNAME = ActiveWorkbook.Sheets(X).Name
    End Function

我希望它可以在任何工作表上使用并返回该工作表的名称,而不是采用数字参数.这甚至可能吗？

Answer 1

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