将公式分配给可变范围的行VBA

我正在尝试创build一个macros,它dynamic地执行一个工作表的查找w /不断增加的行数; 我想编写代码,以便它从第二季度运行vlookup到上一个填充行。 Q(无论如何),到目前为止,我已经想出了这个:

Range(“Q2”,Range(“Q2”)。End(xlDown))。Value =“= VLOOKUP(A2,sheet2!A:BO,67,FALSE)”

macros执行每一行所需的所有操作和相应的更改,但在没有更多数据之后,macros也会无限下移。 我想知道是否有办法在一行代码中这样做,如果可能的话。 我有点新的VBA和无法find已经发布的答案,这充分解决了我的问题,所以任何帮助将不胜感激。

这应该根据您提供的信息。 我猜你是用公式replace现有的值,否则行查找将返回一个你不想要的值。 如果你想从另一列的最后一行改变Cells(Rows.Count, "Q").End(xlUp).Row到你想要的列。

 Range("Q2:Q" & Cells(Rows.Count, "Q").End(xlUp).Row).Value = "=VLOOKUP(A2,sheet2!A:BO,67,FALSE)"