VBA Compute function with string arguments

Question

This function works for me (it returns a string where the text DK001 is in the range of ID)

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

I would like to serve searchcriteria (e.g. DK001) as a string, e.g.

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

I cannot create a string accepted as a search term. I need your help! What am I doing wrong?

---

This Evaluate feature is haunting me ....

What if I now want to send a value (not a string) to a function?

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

The above work!

But if I want it to be a type variable

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

What then?

Answer 1

Double "to include them in the number of literals:

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

Answer 2

Could you try

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