匹配函数Excel VBA中的相对单元格引用

时间:2014-03-31 16:07:21

标签: excel vba excel-vba

为什么我不能在匹配函数中使用相对单元格引用?如果我使用绝对单元格引用,这可以正常工作,但是我需要excel移动到下一行,每个单元格在该范围内进行评估。例如,第一次迭代比较B29,下一次迭代比较B30,下一次迭代评估B31,依此类推。请帮忙!

Sub Test()

    For Each cell In Worksheets("Sheet1").Range("F29:F50")
        If Not IsError(Application.Match(RC[-3], Range("Interior_Lining_Scuffs_Floors"), 0)) Then
            cell.Value = "Interior Lining/Scuffs/Floors"
        End If
    Next

1 个答案:

答案 0 :(得分:1)

你可以使用这个:

For Each cell In Worksheets("Sheet1").Range("F29:F50")
    If Not IsError(Application.Match(cell.Offset(,-3), Range("Interior_Lining_Scuffs_Floors"), 0)) Then
        cell.Value = "Interior Lining/Scuffs/Floors"
    End If
Next