在不使用剪贴板的情况下将范围从新工作簿复制到活动工作簿

Question

我有一个运行宏的活动打开工作簿。我需要打开另一个（新的）工作簿，并从“新”工作表的第一个工作表中复制一系列单元格。文件并将这些行附加到当前工作簿中工作表的底部。我想避免使用剪贴板复制/粘贴。这是我的代码：

{{ }}

从我的（当前）工作簿开始，以及“新的”工作簿开始。一个关闭，当我运行宏时，它只复制一个单元格。

Answer 1

Cells没有采用这种类型的参数。

Set rDst = MyWkbk.Sheets(3).Ran‌​ge("A" & lngLast + 1) 

或

Set rDst = MyWkbk.Sheets(3).Cel‌​ls(lngLast + 1, "A") 

BTW lngLast尚未分配值，因此默认为零