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

时间:2017-03-05 08:40:59

标签: excel vba excel-vba

我想将具有不同数量的条目的列(通过使用.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

我不确定这是否是最简单的方法,但我已经尝试了几次迭代并且总是出错

1 个答案:

答案 0 :(得分:3)

首先,将CopyDestination一起使用是一行命令(而不是2)。

其次,您需要通过添加Range作为前缀,在With Sheets("General Text")语句中完全限定.

尝试以下代码:

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