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

我正在尝试创build一个数组来复制一列数据,但是正在复制的列可能会根据所使用的月份而改变。 该表的标题是月份编号(1,2,3,4),我试图做的是设置起始点(是数组中的第一个单元格)和EndPoint(是数组中的最后一个单元格),与想法然后引用每个创build要复制的数组。

然而,当我尝试运行它时,我得到一个编译错误,说“Sub或Function not Defined”,这是我以前从未见过的。 我试过在线研究,但是我发现所有的信息build议检查参考中的“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)) 

提前致谢。