动态.Range（）函数Excel宏

Question

我正在使用函数.Range（“some_cell”），如下所示：

For i = 1 to 100
   CurrentCell = 3 + i
   ThisWorkbook.Sheets("Sheet1").Rage("JCurrentCell")
Next i

但是，Rage("JCurrentCell")是不允许的，我该如何动态更改此范围（例如：J1，J2，J3，J4，... Jn）

Answer 1

将CurrentCell variable放在引号外：

For i = 1 to 100
   CurrentCell = 3 + i
   ThisWorkbook.Sheets("Sheet1").Range("J" & CurrentCell)
Next i

请记住，请记住：

1. 使用Range()对象名称，而不是Rage()
2. 此行ThisWorkbook.Sheets("Sheet1").Range("J" & CurrentCell)目前尚未完成，但它没有做任何事情。

Answer 2

你也可以使用细胞

For i = 1 to 100
   ThisWorkbook.Sheets("Sheet1").Cells(i + 3, "J")
Next i