Excel VBA 查找工作表上的最后一行

Question

我正在尝试将数据粘贴到数据下方的工作表中。 我有以下内容：

Set BaseWks = Workbooks("Data.xlsx").Worksheets("Total Data")
    rnum = BaseWks.Worksheets("Total Data").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)

但它给了我一个错误： method or data member not found 。 我在做什么？

Answer 1

您只需要

rnum = BaseWks.Range("A" & Rows.Count).End(xlUp).Offset(1, 0).row

因为您已经将BaseWks定义为该工作表。

您还需要.row最后返回行号。

如果您想要单元格本身，则需要Set rnum=... 。