Excel 第一个参数中的Vlookup错误

我的代码有问题。我想从另一个a工作表中查找一个值，然后将其复制到活动工作表中，但问题是我的条件在循环中，这在Vlookup行中给了我一个错误。有人能检测到我的错误吗：

With ThisWorkbook.Sheets("Plan Traitement Risque")
    For i = 6 To lr1 Step 1
      'Test si valeur cellule feuil1!=Ax est dans Plage col_2(feuil2!A1:A50))
    If Application.CountIf(col_2, .Range("B" & i).Value) = 0 Then
     Cells(i, 3).Select
     ActiveCell.Formula = "=VLOOKUP(Cells(i, 2).Value,'Scénarios de menace'!$B$6:$N$700,2,FALSE)"
    End If
    Next i
End With

---

活动单元格公式构建为字符串。如果要将一个VBA函数（如cellsa，b.value）传递到该字符串中，则需要将其与字符串的其他部分连接起来，如下所示：

ActiveCell.Formula = "=VLOOKUP(""" & Cells(i, 2).Value & """,'Scénarios de menace'!$B$6:$N$700,2,FALSE)"

---

编辑：添加引号以容纳cellsi，2中的字符串，正如Jeeped在评论中所建议的那样。

它解决了部分问题，识别了类型，但当我调试时，它给出了：VlookupNOM？；'威胁之星$B$6:$N$700,2，错误…Cellsi，2.值返回什么？是诺姆吗？和名字一样吗？英语Excel中的错误？如果是这样，Excel认为它正在处理一个无法解析的函数或范围名。Cellsi，2。Value应返回您要查找的值。@Souma-可能是一个字符串值，它必须在带引号的字符串中加引号或双引号。像…==VLOOKUP&Cellsi，2.Value&，…@teylyn：是的，它的名称是相同的，这意味着VLOOKUP'Scénarios de nerge'的第二个参数有错误$B$6:$N$700？？吉普德可能击中了它的头部。我已经调整了上面的代码。