在VBA中使用Vlookup进行循环后,单元格递增

在使用Vlookup时,我需要一些关于使用FormulaR1C1循环的帮助。

我一直在寻找有关我所需要的线索,但没有find任何帮助。 我试图增加每个循环后查找值单元格,但总是有定义的错误。

  • 每次循环传递代码时,我都需要“VALUE”以2递增。
  • 问题是VBA不接受声明,除了使用R1C1之外,还有其他方法吗?

示例代码

 g=100 VALUE= 5 Worksheets.("NewData").Select For i = 1 To 7 Worksheets.("NewData").Cells( g + i, 4).FormulaR1C1= "=Vlookup(R[-VALUE]C[+1], Data!R1C1:R100C100, 2, False)" VALUE=VALUE+2 Next i 

您需要将VALUE数据连接到公式中:

 g=100 VALUE= 5 Worksheets.("NewData").Select For i = 1 To 7 Worksheets.("NewData").Cells( g + i, 4).FormulaR1C1= "=Vlookup(R[-" & VALUE & "]C[+1], Data!R1C1:R100C100, 2, False)" VALUE=VALUE+2 Next i