将两个变量添加到行号

时间:2014-05-26 08:35:28

标签: excel vba variables excel-vba row

我是vba excel的新手,我正在混合使用这种语言和C语言。我需要创建一个 for循环,例如,我们有单元格A5 ,在下一个循环中,单元格行变为 A(5 + j + k) j 最初为 0 ,但在循环结束时 j = j + 5 。而 k 是另一个依赖于另一个循环的变量。你能告诉我如何在vba中写这个:A(5+j+k)吗? 为了更清楚,我的代码还不对,但它或多或少是这样的:

For i = 1 To 3

Sheets("Sheet1").Select
j = 0

Range("A5+j").Select
ActiveCell.FormulaR1C1 = "XXX"

ActiveCell.Offset(1, 0).Select
ActiveCell.FormulaR1C1 = "YYY"

ActiveCell.Offset(1, 0).Select

j = j + 5

Next i 

我终于得到了这个问题的答案,并想到在这里分享它,因为我目前无法如此迅速地回答我自己的问题。所以,我需要编写

的语法
A(5+i+j)

这很简单,我会举一个小例子来告诉你它是如何工作的:

For i = 0 To 5
   For j = 2 To 6
     Cells(5+i+j,1).Value= "whatever i want to write here"
   Next j
Next i

干杯, 霍克

1 个答案:

答案 0 :(得分:0)

要从所选单元格向右移动nToTheRight单元格:

Dim nToTheRight : nToTheRight = j+k
ActiveCell.Offset(0,nToTheRight).Select