vba - 使用 LastRow 自动填充

标签 vba excel

我正在 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)

谢谢你的帮助!

最佳答案

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

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

关于vba - 使用 LastRow 自动填充,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/16948441/

相关文章:

vba - 缩小后的 Excel/PowerPoint 文本大小

python win32 excel复制工作表并更改复制工作表的名称

Excel 显示不正确的多项式趋势线函数

excel - 变量不会转换为整数

excel - 从 Excel 发送 Outlook 电子邮件,将隐藏工作表中的格式化文本放入电子邮件正文中

Excel VBA 文件名更改

sql - 使用VBA在 Access 中执行SQL插入语句时出现问题

java - 如何将 .ods 文件转换为 .xls 文件

excel - 非相邻单元格作为数组函数的输入(MIN 和 ISBLANK)

javascript - 在网站上使用 html 中的 vba 更新依赖组合框