Instr函数找不到子字符串

Question

我有以下VBA代码，它返回＆＃34; 0＆＃34;对于InStr函数：

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.Find函数确实在位置6处找到子字符串：

web.config

为什么WorksheetFunction返回6而InStr函数没有找到子字符串？

Answer 1

如果查看the documentation for the InStr 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