无法将我在VBA中选择的内容粘贴到特定范围

无法将我在VBA中选择的内容粘贴到特定范围,vba,excel,copy,Vba,Excel,Copy,这会引发一个1004错误,称为“应用程序定义/对象定义”错误 我试着把第四行改成 Private Sub Daily_Click() Sheets("Sheet1").Range("A1:P1").Select Selection.Copy Sheets("Sheet2").Range("A1:P1").Select ActiveSheet.Paste End Sub 这很有效。我需要知道为什么第一段代码不起作用最好不要使用选择 复制内容的简单方法: Sheets("Sheet2").Sele

这会引发一个1004错误,称为“应用程序定义/对象定义”错误

我试着把第四行改成

Private Sub Daily_Click()
Sheets("Sheet1").Range("A1:P1").Select
Selection.Copy
Sheets("Sheet2").Range("A1:P1").Select
ActiveSheet.Paste
End Sub

这很有效。我需要知道为什么第一段代码不起作用

最好不要使用
选择

复制内容的简单方法:

Sheets("Sheet2").Select
ActiveSheet.Paste
编辑:或使用
选择

Sheets("Sheet1").Range("A1:P1").Copy Destination:=Sheets("Sheet2").Range("A1:P1")

当我将第4行更改为图纸(“图纸2”)时。选择,我的代码中的错误到底是什么?我仍然无法理解这一点out@bhavya:您可以尝试选择范围
工作表(“Sheet2”)。范围(“A1:P1”)。当其他工作表激活时选择
@Dawid!知道了
Sub Daily_Click()

Sheets("Sheet1").Activate
Sheets("Sheet1").Range("A1:P1").Select
Selection.Copy
Sheets("Sheet2").Activate
Sheets("Sheet2").Range("A1:P1").Select
ActiveSheet.Paste

End Sub