Excel VBA将数组分配给具有.List的列表框-权限被拒绝错误

我试图遵循这个答案中的概念，但是在执行.List时，我遇到了一个权限被拒绝的错误。在手表窗口中，U阵列看起来很好

任何关于如何追踪问题的想法都将受到赞赏

Sub test()

    Sheets("InvoiceData").AutoFilterMode = False
    Sheets("InvoiceData").Range("K1:K2").AutoFilter
    Sheets("InvoiceData").Range("K1:K2").AutoFilter field:=1, Criteria1:="Y"

    TRADED_ARRAY = Sheets("InvoiceData").Range("B2:L1001").Value

    ActiveSheet.ListBox1.Object.ColumnHeads = True
    ActiveSheet.ListBox1.Object.ColumnCount = 11
    ActiveSheet.ListBox1.Object.ColumnWidths = "1.25 in;2.0 in;1.0 in;1.25 in;1.25 in;1.0 in;1.25 in; 1.0 in;1.0 in;0.75 in;0.75 in"
    ActiveSheet.ListBox1.Object.IntegralHeight = False
    ActiveSheet.ListBox1.Object.Font.Size = 11
    ActiveSheet.ListBox1.Top = 220.5
    ActiveSheet.ListBox1.Left = 339.75
    ActiveSheet.ListBox1.Width = 800
    ActiveSheet.ListBox1.Height = 500.25
    ActiveSheet.ListBox1.List = TRADED_ARRAY

End Sub

---

通过哪一条线会出错？您使用的是什么版本的Excel？您最近是否安装了Office更新？什么是U阵列？它的作用域是公共的，私有的吗？我在执行.List时遇到一个权限被拒绝的错误。Excel 2010。没有更新。数组是NUM和工作表上的文本的混合体，范围如上所述，未声明。我只是测试一下，看看是否可以从这个链接获得语法。谢谢我找不到关于它的文件。