与范围不允许范围（细胞，细胞）只范围循环（“A：A”）

Question

背景：

我有至7×30单元的阵列，以循环。对于30列中的每一列（Dim j），我循环行（Dim i）1以查看是否存在值，如果是，则开始复制第2行至第7行的范围。

在试图使用如）：

Sheets("NAME").Range(Cells(i+1,1),Cells(i+7,1)).Copy 

我得到一个1004，应用程序定义或对象定义的错误，我已经能够使用，以缓解：从我的代码行

Sheets("NAME").Range("A" & i+1 & ":A" & i+7 & ").Copy 

错误：

Sheets("RM").Range(Cells(i + 6, 2), Cells(i + 13, 2)).Copy 

---

问题：

这工作与已知列的项目，但我不能确定如何进行的变量列，以及。我知道，这不起作用：

Sheets("NAME").Range(Cells(i+1,j),Cells(i+7,j)).Copy 

我需要找到一个方法来适应没有细胞的这种范围模式对于j，变量列工作。

---

问：

有没有一种方法，使不使用电池使用范围这项工作？

我唯一的猜测是下面的，我相信使用不正确的语法：

Sheets("NAME").Range(Columns(j) & i+1 & ":" & Columns(j) & i+1).Copy 

任何帮助，将不胜感激！

编辑：将错误1004名称添加到此问题部分。

Answer 1

尝试用纸张您作序通话Cells(即Range(Sheets("Sheet1").Cells(1, 1), Sheets("Sheet1").Cells(2, 2))

如果省略该板在调用Cells或Range然后它会默认为当前选定的表的引用，因此，如果你打电话Sheets(Unselected Sheet).Range(Cells(1, 1))它会在你指的是哪张表之间产生混淆。