Question

Dim LastRowC As Long
Dim LastRowE As Long
Dim Deelnemernr As Long
    LastRowC = Range("C1048576").End(xlUp).Row + 1
    Deelnemernr = Cells(LastRowC, 3).Offset(0, 4).Select

我可以设法选择我想在下面的公式中使用的变量单元格。所以上面的代码可以工作。

LastRowE = Range("E1048576").End(xlUp).Row + 1
Cells(LastRowE, 5).Formula = "=Index(E:E,Match(Deelnemernr,G:G,0))"

我似乎无法在我的匹配公式中使用上面声明的变量作为Deelnemernr。当我使用固定的细胞（例如G12）而不是Deelnemernr时，配方确实有效。谁能告诉我如何在公式中引用声明的变量？

Answer 1

您需要在双引号Deelnemernr之外获取"变量。

此外，此处无需使用Select：

Deelnemernr = Cells(LastRowC, 3).Offset(0, 4).Select

通过以下方式获取该单元格的值：

Deelnemernr = Cells(LastRowC, 3).Offset(0, 4).Value

尝试以下代码：

LastRowC = Range("C1048576").End(xlUp).Row + 1
Deelnemernr = Cells(LastRowC, 3).Offset(0, 4).Value

LastRowE = Range("E1048576").End(xlUp).Row + 1
Cells(LastRowE, 5).Formula = "=Index(E:E,Match(" & Deelnemernr & ",G:G,0))"

在VBA公式中使用声明的变量

1 个答案: