将单元格范围从一张纸复制到另一张纸

Question

我想将具有不同条目数的列（通过使用.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与Destination一起使用是1行命令（不是2行）。

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

请尝试以下代码：

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