我正在尝试将数据从启用宏的Excel工作表复制到简单的Excel文件中。 但是以下代码会抛出错误,例如找不到对象。
我在工作表中编写了VBA代码,其中还有一个宏用于某些其他功能。
Private Sub CommandButton2_Click()
Workbooks("JHG raw data.xlsm").Worksheets("Summary").Range("A1:D300").Copy_
Workbooks("JHG summary.xlsx").Worksheets("Data").Range ("A1")
End Sub
答案 0 :(得分:-1)
在复制后放置Destination:=
Workbooks("JHG raw data.xlsm").Worksheets("Summary").Range("A1:D300").Copy _
Destination:=Workbooks("JHG summary.xlsx").Worksheets("Data").Range ("A1")