Excel VBA范围从另一个工作表复制

我有一行代码，我有问题的故障排除。

Sheets("data").Range(cells(2,1), cells(2, column).Copy 

我得到了一个1004 application or object defined error 。 如果我删除了工作表select，或者用硬编码的引用（例如e4：e50）replace范围块，代码将起作用，但是不能一起工作。

Answer 1

现在你有范围看一张工作表，单元格正在看活动工作表。 您需要确保他们正在查看同一张表。

你可以这样做：

 Sheets ("data").Range(Sheets ("data").cells (2,1), Sheets ("data").cells (2, column)). Copy 

或者你可以使用With Block来减lessinput

 With Sheets ("data") .Range(Sheets (.cells (2,1), .cells (2, column)). Copy End With