如何将数据从工作簿1的工作表1复制到工作簿2的工作表2？

Question

我需要将数据从const range = (start, end) => end < start // terminating condition ? [] // base case : [ ...range(start, end - 1), end ] // recursive step console.log(range(5,10)) // [ 5, 6, 7, 8, 9, 10 ]的{​​{1}}复制到Sheet1的{​​{1}}。我需要将工作表1的数据从Workbook1复制到Sheet2（LastRow），然后将整个复制的数据粘贴到Workbook2的{​​{1}}的{​​{1}}中。

这是我的代码：

A1

我遇到以下错误

AE

我想使用用于工作簿和工作表名称的变量

Answer 1

替换此代码：

Workbooks("D:\Excel\Workbook1.xlsx").Worksheets("Sheet1").Range("A1:AE" & LastRow).Copy _
Workbooks("D:\Excel\Workbook2.xlsx").Worksheets("Sheet2").Range("Q1")

与此：

NewWorksheetA.Range("A1:AE" & LastRow).Copy
NewWorksheetB.Range("Q1").PasteSpecial xlPasteAll
Application.CutCopyMode = False

希望我的回答有帮助。 ：）