请教这句代码如何理解

bosweet

Set rng = Worksheets(bj).Range("a1048576").End(xlUp).Offset(1, 0)

szynba3323

令 单元格 等于 工作表名为BJ的 返回A列最后一个单元格向上移动最大距离（即从下往上面数第一个有内容的单元格），然后再想下偏移1行，列不偏移

szynba3323

单元格RNG为对象变量

szynba3323

一个一个的理解  worksheets()  range()  end(xlup)         offset(1,0)
                        工作表           区域        向上偏移          偏移量  1表示往下1行 0表示不移动列方向
                                                       相当于ctrl+↑
                                                        在excel表中

准提部林

Set rng = Worksheets(bj).Range("a1048576").End(xlUp)(2)
〔由下而上〕找最後一個〔非空〕單元格，並定位其下一個空白格

可分兩行：
Set rng = Worksheets(bj).Range("a1048576").End(xlUp) '最後一個非空單元格
Set rng = rng(2) '下移一格