Question

任何人都可以在下面的代码上为我提供帮助吗

我正在尝试查找某个单元格是否包含给定单元格范围内的任何文本。然后返回找到的文本。如果我给像B4：B6这样的单元格范围，它也可以正常工作，但是我希望它一直是动态的直到B列的最后一行。

单元格中使用的公式

IFERROR(LOOKUP(1,0/COUNTIF($H2,"*"&Requirement!$B$2:$B$4&"*"),Requirement!$B$2:$B$4),"No Data")

VBA字幕

ActiveCell.FormulaR1C1=_"=IFERROR(LOOKUP(1,0/COUNTIF(RC8,""*""&Requirement!R2C2:R4C2&""*""),Requirement!R2C2:R4C2),""No Data"")"

这里而不是Requirement!$B$2:$B$4，我希望它一直到最后一行。

Answer 1

这取决于您要表中的最后一行还是包含数据的最后一行。通用的解决方案比较简单，您替换

"R2C2:R4C2"

使用

"R2C2:R" & Rows.Count & "C2"

这为您提供了工作表中的最后一行。如果希望最后一行包含列B中的数据，请使用：

"R2C2:R" & ActiveSheet.Cells(Rows.Count, "B").End(xlUp).Row & "C2"

使用它替换代码中所有相关的单元格引用。