在VBA中创建数组 - 返回“子或函数未定义”

Question

我正在尝试创建一个数组来复制数据列，但是复制的列可能会根据使用的月份而有所变化。该表的标题是月份编号（1,2,3,4），我试图做的是设置一个StartingPoint（作为数组中的第一个单元格）和一个EndPoint（作为数组中的最后一个单元格），我的想法是引用每个来创建要复制的数组。

然而，当我尝试运行它时，我得到一个编译错误，说“Sub或Function not Defined”，这是我以前从未见过的。我尝试过在线研究，但我发现的所有信息都建议检查Referencing中的“Solver.xla”框，但是没有Solver.xla选项可以检查！

我写的代码如下。如果有人可以提供协助和/或提供任何有用的提示或链接，请阅读它。非常感谢。

作为参考，出现错误时突出显示偏移。

Dim ws7 As Excel.Worksheet
Set ws7 = ActiveSheet

Dim StartingPoint As Range
Dim EndPoint As Range
Set StartingPoint = Range("C58:R58").Find(ws7.Range("C3"))
Set EndPoint = Range(StartingPoint, Offset(10, 0))

提前致谢。