excel - VBA Excel：复制具有起始位置和目标位置的列

Question

我想将列的值从一个工作表复制到另一个已经有行的工作表。

我想将工作表“源”中的 A 列中的值添加到工作表“dest”中的 X 列。但是我想跳过源列的前 2 行，并且应该在第 2000 行之后插入值。

例如像这样：

Workbook.Sheets("source").Columns("A3:A").Copy Destination:=nDestSheet.Range("X2001")

但是 VBA 告诉我类型不匹配。我想我只是在语法方面做错了。

有人可以帮忙吗？

谢谢！

Answer 1

.Columns接受列号或字母，而不是范围。这并不重要，因为“A3:A”无论如何都不是有效范围。

你可能想要

With Workbook.Sheets("source")
  .Range(.Range("A3"), .Columns("A").Cells(.UsedRange.Rows(.UsedRange.Rows.Count).Row)).Copy Destination:=nDestSheet.Range("X2001")
End With

Answer 2

一个简单的怎么样：

Workbook.Sheets("source").Columns("A").Copy Destination:=nDestSheet.Range("X2001")