VBA – Excel：提到一个等于给定less一行的范围

所以我有一个给定的函数，它接收一个范围（它总是大小（X，1） – 意味着它是一个列）作为参数，如下所示：

函数myfunction（byref myrange as Range）为Double

…

myfunction =东西

结束function。

在这个函数的某个地方，我需要引用“myrange of size（X-1,1）”。

这是我想调用函数，应该接受作为参数相同范围的myrange，而不是说，B10：B15我想通过它B10：B14

我不知道该怎么做

你可以帮我吗？ 谢谢，

瑞

Answer 1

使用Resize方法：

 Function myfunction (ByVal myrange as Range) as Double Set myrange = myrange.Resize(rng.Rows.Count - 1) 

重要说明 ：当我修改myrange我已将原型更改为ByVal 。