excel - 在工作表函数中使用 UDF 返回值

Question

我创建了一个UDF返回特定列中最后填充的行。现在，它返回最后填充行的行号。我的问题是，我将如何在工作表函数中使用这个值？

例如，=COUNTBLANK("B2:B&LastRow(2)), 其中LastRow(2)返回一个整数。

Answer 1

首先是UDF

Public Function LastRow(Rin As Range) As Long
    cl = Rin.Column
    LastRow = Cells(Rows.Count, cl).End(xlUp).Row
End Function

然后在工作表中使用它：

=COUNTBLANK(INDIRECT("B2:B"& LastRow(B:B)))

Answer 2

当你可以用公式实现你想要的东西时，为什么还要使用 VBA？

要获取列中的最后一行，请使用此公式。

=MATCH(9.9E+307,A:A,1)

以上将为您提供A列的最后一行

要将其与您的公式一起使用，请尝试此操作。

=COUNTBLANK(INDIRECT("B2:B"& MATCH(9.9E+307,B:B,1)))