String 如何使用excel下一行代码

String 如何使用excel下一行代码,string,vba,excel,String,Vba,Excel,我写了一个代码= Worksheets("Sheet1").range("A" & ":E").Copy Destination:=Sheets("Sheet2").range("A1"). 此代码帮助我将Sheet1中的内容(A列到E列)复制到另一张Sheet2。它在A1中被复制。但是,代码将A列中的所有内容复制到E列。在特定行下面有一些我不想要的内容。 我已应用End(xlDown)。行代码如下: Worksheets("Sheet1").range("A" & ":E")

我写了一个代码=

Worksheets("Sheet1").range("A" & ":E").Copy Destination:=Sheets("Sheet2").range("A1").
此代码帮助我将Sheet1中的内容(A列到E列)复制到另一张Sheet2。它在A1中被复制。但是,代码将A列中的所有内容复制到E列。在特定行下面有一些我不想要的内容。 我已应用End(xlDown)。行代码如下:

Worksheets("Sheet1").range("A" & ":E").End(xlDown).Row.Copy 
Destination:=Sheets("Sheet2").range("A1")
但是,它给了我运行时错误

'424': Object required

请帮忙。提前感谢

您的问题并不完全清楚,但事实上,您的代码失败了,因为
.Row
方法返回的是长/整数值,而不是范围对象。不能对整数使用
.Copy
方法,因此可以解释错误

您可以尝试仅复制该范围内的最后一行(注意:您可以执行
.range(“A:E”)
,没有理由使用与来连接两个字符串文字,您只需使用完整的字符串“A:E”):

或者,如果需要将整个范围复制到
.End(xlDown)
,那么我认为:

Worksheets("Sheet1").Range("A1:E1", Range("A1:E1").End(xlDown)).Copy _
    Destination:=Sheets("Sheet2").Range("A1")
否则,需要更多的细节来提供帮助

Worksheets("Sheet1").Range("A1:E1", Range("A1:E1").End(xlDown)).Copy _
    Destination:=Sheets("Sheet2").Range("A1")