VBA使用string参数评估函数

我有这个function工作（它返回文本DK001坐在ID范围内的行）

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

我想饲料searchcriteria（如DK001）作为一个string，像

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

我无法创build一个被接受为search条件的string。 我需要你的帮助！ 我究竟做错了什么？

---

这个评估function是困扰着我….

如果我现在想要发送一个值（而不是一个string）到函数呢？

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

以上作品！

但是，如果我想这是一个variables

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

然后怎样呢？

Answer 1

双"包括他们作为文字：

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

Answer 2

你可以试试

 Application.Evaluate("=IF(ID="" & searchsrtring & "",ROW(ID),""x"")")