我在Sheet2的单元格J1中对Sheet1中的一个表执行vlookup。之后,我想将公式向下扩展到Sheet2中J列的最后一行。我在列J上的AutoFill部分遇到了问题。另外,我在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)谢谢你的帮忙!
发布于 2013-06-06 03:47:19
也许您的目标应该包括起始单元格J1:
Selection.AutoFill Destination:=Range("J1:J" & LASTROW2)https://stackoverflow.com/questions/16948441
复制相似问题