VBA简单地将一个范围复制到另一个范围

Spa*_*awk 4 vba excel-2011

这是一个非常简单的VBA公式,但它失败了.它只是粘贴到A6单元格之后.只有我吗?依旧是Excel 2011.

Range("A4:A5").Select
Selection.Copy
Range("A6:A1000").Select
ActiveSheet.Paste
Run Code Online (Sandbox Code Playgroud)

Ale*_*x P 10

我认为问题是你在A4和A5中有两个不同的值,因此如果粘贴范围是偶数个单元格,excel只能在粘贴范围内重复这些值.

这对我有用:

Range("A4:A5").Copy Destination:=Range("A6:A1001")
Run Code Online (Sandbox Code Playgroud)

注意,A6:1001是996个单元(偶数).使用A6:A1000是995并且是奇数,因此excel无法解决如何从A4到A5重复您的值.

我认为这是问题...但很高兴接受其他方面的教育......