如何在excel vba中为vlookup函数提供单元格地址？ 子功能1（） 当单元格（i，4）““”循环直到列中存在值时执行此操作 如果单元格（i，2）>0，那么‘如果我们有一个正值 单元格（i，5）。公式=“=vlookup（单元格（i，3）。地址（0

如何在excel vba中为vlookup函数提供单元格地址？

子功能1（）
当单元格（i，4）““”循环直到列中存在值时执行此操作
如果单元格（i，2）>0，那么‘如果我们有一个正值
单元格（i，5）。公式=“=vlookup（单元格（i，3）。地址（0，0），表，2，true）”添加上下文
如果“查找所需的列值，则结束”
i=i+1
“循环”尝试将单元格地址输入vlookup

C“&i&”应该这样做你也可以找到我写的这个答案（关于在字符串值中包含变量），很有帮助：你也可以使用R1C1引用：

cells（i，5）。formulaR1C1=“=vlookup（RC3，表，2，true）“

为那些不熟悉RC符号的人扩展@Rory的注释：使用

RC3

告诉公式在同一行的第三列中查找包含公式的单元格。我遇到的问题是，我的代码不是RC3。它将是RiC3，其中i是一个在每次迭代中都会变化的整数。即使我在“监视”选项卡中检查变量的值，VBA也不接受该变量。

sub function1()
    Do While cells(i,4)<>"" 'Loop till value exists in column
        if cells(i,2)>0 Then ' If we have a positive value
            cells(i,5).formula="=vlookup(cells(i,3).address(0,0),table,2,true)' Adding context
        end if ' Lookup the required column value
    i=i+1
    Loop 'Try to give address of a cell into vlookup