使用LastRow自动填充

Question

我正在Sheet1单元格Sheet1的单元格J1中查找。之后，我想将公式向下扩展到Sheet2中J列的最后一行。我在列J上的自动填充部分遇到问题。另外，我在Sheet1中使用另一个LastRow语句作为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)