在 Excel 数组中查找（文本）值

Question 1

您可以使用“数组公式”相对简单地完成此操作，而无需添加任何列，例如对于直到 Z 列的范围

=MIN(IF(T0.02!$D$2:$Z$100=$A3;T0.02!$B$2:$B$100))

确认CTRL+SHIFT+ENTER

如果没有匹配，则结果为零；如果您想要空白，则为了区分合法的零值，可以使用 SMALL 和 IFERROR，即

=IFERROR(SMALL(IF(T0.02!$D$2:$Z$100=$A3;T0.02!$B$2:$B$100);1);"")

Answer

您可以使用“数组公式”相对简单地完成此操作，而无需添加任何列，例如对于直到 Z 列的范围

=MIN(IF(T0.02!$D$2:$Z$100=$A3;T0.02!$B$2:$B$100))

确认CTRL+SHIFT+ENTER

如果没有匹配，则结果为零；如果您想要空白，则为了区分合法的零值，可以使用 SMALL 和 IFERROR，即

=IFERROR(SMALL(IF(T0.02!$D$2:$Z$100=$A3;T0.02!$B$2:$B$100);1);"")

Question 2

这是一种使用一些 VBA 来简化查找而无需任何辅助单元的方法。

VBA 部分是这个用户定义函数（通常称为 UDF），其用途与您尝试用来查找文本所在行的 MATCH 函数相同：

Function FindRow(valueToFind, searchRange As Range, Optional IsCaseSensitive As Variant) As String
   Dim aCell As Range
   Dim lastCell As Range
   If IsMissing(IsCaseSensitive) Then
      IsCaseSensitive = False
   End If
   Set lastCell = searchRange.Cells(searchRange.Rows.Count, searchRange.Columns.Count)
   Set aCell = searchRange.Find(valueToFind, After:=lastCell, LookIn:=xlValues, MatchCase:=IsCaseSensitive, LookAt:=xlWhole)
   FindRow = aCell.Row - searchRange.Cells(1, 1).Row + 1
End Function

它之所以有用，是因为 VBA FIND 函数与工作表 MATCH 函数不同，它可以搜索跨越多列和多行的范围。与 MATCH 一样，此 VBA 函数返回在搜索范围内找到指定值的行，如果找不到该值，则返回 #VALUE! 错误。

FindRow 的前两个参数是需要查找的值（或该值所在的单元格）和要查找的范围。还有第三个可选参数：如果设置为 TRUE 或 1，则查找将区分大小写；如果省略或设置为 FALSE 或 0，则查找将不区分大小写。

在第二张表中，您将使用 INDEX 与 FindRow 结合来查找时间，例如，

=INDEX(Sheet1!$B$2:$B$8,FindRow(A3,Sheet1!$D$2:$Z$9))

FindRow 的第二个参数设置为包含注释值的范围。虽然我已显示搜索范围延伸至第 Z 列和第 9 行，但 FindRow 可以处理任意大小的范围。

要安装 VBA 函数，首先从功能区上的“开发人员”选项卡中选择“Visual Basic”。在左上角的项目窗格中选择工作簿名称（工作簿将被指定为“VBAProject（YourSheetName）”），然后使用顶部的菜单栏插入模块。最后，将函数代码粘贴到右侧出现的大代码窗格中。

Answer