vba - 使用 LastRow 自动填充

Question

我正在 Sheet1 中的表格上的 Sheet2 的单元格 J1 中进行 vlookup。之后，我想将公式扩展到 Sheet2 中 J 列的最后一行。我在使用 J 列的 AutoFill 部分时遇到问题。此外，我正在使用另一个 LastRow 语句来进行 Sheet1 中的 vlookup。

这是我所拥有的（从 Sheet1 开始）：

*SOME OTHER CODE*
LASTROW = Range("A" & Rows.Count).End(xlUp).Row
Sheets("Sheet2").Select
LASTROW2 = Range("A" & Rows.Count).End(xlUp).Row
ActiveWindow.SmallScroll Down:=-51
    Range("J1").Select
Application.CutCopyMode = False
ActiveCell.FormulaLocal = "=VLOOKUP(F1,Sheet1!$F$2:$G$" & LASTROW & ",2,false)"
Selection.AutoFill Destination:=Range("J2:J" & LASTROW2)

谢谢你的帮助！

Answer 1

也许您的目的地应该包括起始单元格 J1：

Selection.AutoFill Destination:=Range("J1:J" & LASTROW2)