VBA怎样取到查找到的单元格位置

来源:百度知道 编辑:UC知道 时间:2024/06/21 23:49:26
例如在A1:E10里面查找"abc"(每个单元格不重复,只有一个单元格里面有abc)
查找之后要取到这个单元格的位置,也就是行列,请教如何做到?
主要不是要去查找而是要知道查找到之后那个单元格的行列是多少

查找用Range对象的Find方法,返回Rang对象,然后再取Range对象的Row属性或Column属性返回行或列。要注意的是Find方法可能会返回Nothing,要先检查一下,否则后出错。

例如:

Set C=Range("A1:E10").Find("abc")
If Not C Is Nothing then
R=C.Row '返回行
Cl=C.Column '返回列
end if

或:

Set C=Range("A1:E10").Find("abc")
If Not C Is Nothing then
C.Select
R=Selection.Row '返回行
Cl=Selection.Column '返回列
end if