从一个工作表复制和粘贴一系列单元格到另一个工作表

Question

我试图将一个工作表（Sheet2）中的单元格范围复制到另一工作表（Sheet1）中的单元格范围中，但是当我运行以下内容时，出现运行时错误（1004）应用程序定义或对象定义的错误。 任何帮助表示赞赏！

Option Explicit

Sub deletecolumns()

Workbooks(1).Worksheets(1).Columns(2).Select
Workbooks(1).Worksheets(1).Columns(2).Delete


Sheets("Sheet2").Range("I4:I29").Copy Destination:=Sheets("Sheet1").Range("H4:H29")

End Sub

Answer 1

删除此行：

Workbooks(1).Worksheets(1).Columns(2).Select

无论如何，在执行.delete之前都不需要它