Instr函数找不到子字符串

Question

我有以下VBA代码，它返回InStr函数的"0“：

If InStr("ICD-10 & CPT OPC NHSN", "JCMC ICD-10 & CPT OPC NHSN Sep-17 new.xlsx") > 0 Then
   'Do something
End If

然而，使用WorksheetFunction.Find函数的下列代码确实将子字符串定位在位置6：

If Application.WorksheetFunction.Find("ICD-10 & CPT OPC NHSN", "JCMC ICD-10 & CPT OPC NHSN Sep-17 new.xlsx") > 0 Then
    'Do something
End If

为什么WorksheetFunction返回6，而InStr函数没有定位子字符串？

Answer 1

如果您查看 function，您将看到两个强制参数中的第一个参数是要搜索的字符串，第二个参数是要查找的字符串。

需要string1。正在搜索字符串表达式。 需要string2。寻找字符串表达式。

所以你的代码需要

If InStr("JCMC ICD-10 & CPT OPC NHSN Sep-17 new.xlsx", "ICD-10 & CPT OPC NHSN") > 0 Then
   'Do something
End If