VBA ActiveWorkbook/RefersToLocal - 1004 应用程序定义或对象定义错误

Question

执行以下行时，抛出1004运行时错误(应用程序定义或对象定义错误)

rangeString = ActiveWorkbook.Names.Item("MyTableName").RefersToLocal

我看不出我的代码有任何问题，并且表名称似乎是正确的。这段代码位于类模块内，我不是 vba 专家，所以我不知道这是否会引入范围等方面的任何问题。

Answer 1

如果您的对象(MyTableName)是 Excel 数据表，请使用 ListObject 使用的 Range，例如

Sub test()
    Dim L As ListObject

    Set L = ActiveSheet.ListObjects("MyTableName")
    ' at this point you can inspect the properties of L in the debugger

    ' retrieve the local address of tue underlying range
    Debug.Print L.Range.AddressLocal

End Sub