Excel VBA StrCmp子项或函数未定义

我试图在excel vba（使用excel 2007）中使用StrCmp函数，但出现以下错误： 编译错误： 未定义子或函数

这是我的密码：

    StrCmp(Worksheets(1).Range("I" & x).Value, "Critical")

---

任何帮助都将不胜感激。

函数名为

StrComp

，您可以说：

StrComp（StringArg1、StringArg2、compareMethod）=0

表示匹配。
在您的情况下，您似乎会使用

if StrComp(Cstr(Worksheets(1).Range("I" & x).Value), "Critical", vbTextCompare) = 0 then
    ' you now have found a match
    ' do something
end if

更多关于，也可以在这里看到