使用“查找函数”返回单元格地址

时间:2014-07-31 09:31:07

标签: excel-vba vba excel

我正在使用find函数搜索特定标题的多个不同范围。

如果此标题存在,我想从下面的单元格中提取信息。 find函数是否可以返回找到的单元格的地址,然后我可以简单地搜索Cell(x + 1,y)从下面提取数据?

我目前的代码是;

For i = 1 To LastRow
    X = VirtMat(i, 1)
    Set TestRange = Range(X)

        Set BILL = TestRange.Find("Loss Number:")
                If Not BILL Is Nothing Then 'RETURN CELL ADRESS AND EXTRACT INFO


                Else: rpd(cr, 1) = "NOINFO"


                End If

Next

1 个答案:

答案 0 :(得分:0)

As per MSDN

  

查找范围内的特定信息,并返回 范围对象 ,表示找到该信息的第一个单元格。

所以回答你的问题是肯定的。您可以使用 范围Obejct 地址或行和列属性

Debug.Print BILL.Address '~~> default is A1 notation
Debug.Print BILL.Row '~~> returns row number
Debug.Print BILL.Column '~~> column number

实际上,您可以直接获取邻近或低于其的单元格中的值。

示例:要获得低于找到的单元格的值,请使用偏移方法

Debug.Print BILL.Offset(1, 0).Value