带字符串参数的VBA评估函数

我正在使用此功能（它返回文本DK001位于ID范围内的行）

Found = Application.Evaluate("=IF(ID=""DK001"",ROW(ID),""x"")")

我想将搜索条件（例如DK001）作为字符串提供，例如

Found = Application.Evaluate("=IF(ID=SearchString,ROW(ID),""x"")")

我无法创建一个被接受为搜索条件的字符串。我需要您的帮助！我究竟做错了什么？

这个评估功能困扰着我....

如果我现在想向函数发送一个值（而不是字符串）怎么办？

Found = Application.Evaluate("=IF(ID=1,ROW(ID),""x"")")

以上作品！

但是如果我希望这是一个像

Found = Application.Evaluate("=IF(ID=MyValue,ROW(ID),""x"")")

然后怎样呢？

双击"以将它们包括为文字：

SearchString = "DK001"
Found = Application.Evaluate(""=IF(ID=""" & SearchString & """,ROW(ID),""x"")")