最好搜索工作表.EXCEL VBA用户表格

Question

  

可能重复：
  Find cell location based on value then do something- User Forms VBA Excel

我正在构建一个用户表单并尝试编写如何编写代码块：

*从用户获取组合框的值。 *在特定列中的特定工作表上搜索此值 *获取此值的单元格位置 *返回一个办公室集行为地址，下一个偏移行为城市“

之前我问过同样的问题，然而，经过一段时间后，答案无济于事。

这是我提出的代码：

For Each cLoc In ORISheetList.Range("ORI_LIST")
'compare the input string from list- considering using Match function for this
If StrComp(cLoc, ORIValue,  vbTextCompare) Then TextBAgencyName.Value = "test"
Else: Next cLoc
End If

for Each循环，如果条件不能很好地协同工作。

我读过vba excel上有一个find函数。有没有办法确定获得细胞的位置？感谢

Answer 1

使用

Set cLoc = ORISheetList.Range("ORI_LIST").find ORIValue
If not cLoc is nothing then
    ' you found it!