根据工作表中指定的行号将范围加载到数组

Question

有谁知道我如何用一个链接到特定单元格的动态代码替换下面的代码？

即。替换这个

dim array1()
array1=range("a150:k250")

与此类似的东西

dim array1()
array1=range(application.indirect("a"&c1&":k"&d1)

其中c1包含值150，d1包含值250

Answer 1

删除间接，使用C1和D1上的Value属性：

array1=Range("a" & Range("c1").Value & ":k" & Range("d1").Value)