将单元格的范围复制到另一个表格

我想用不同数量的条目复制一列（使用.End（xlDown））到另一个表格的C列向下。

With Sheets("General Text") Range(Range("A2"), Range("A2").End(xlDown)).Copy Destination:=Sheets("Compiler").Range(Range("C2"), Range("C2").End(xlDown)) End With 

我不知道这是否是最简单的方法，但我已经尝试了几次迭代，总是出错

Answer 1

首先，使用Copy with Destination是一个1行命令（不是2）。

其次，你需要通过addind a来完全限定你的Range在With Sheets("General Text")语句中. 作为前缀。

试试下面的代码：

 With Sheets("General Text") .Range(.Range("A2"), .Range("A2").End(xlDown)).Copy Destination:=Sheets("Compiler").Range("C2") End With