VBA Like Function

Question

基本上我的代码的工作方式是将Outlook中的传入电子邮件主题与Excel中的列表列进行比较 - 据称是那些现有的电子邮件。如果传入电子邮件与任何记录匹配，则它在Excel中显示值。但是，我注意到，如果Excel中的数据包含＃标签（＃）值，即使传入的电子邮件与Excel中的数据不同，代码也会将其标记为匹配。

If emlSubj Like "*" & strSubj & "*" Then
Debug.Print strSubj

代码有问题还是LIKE功能的限制？

Answer 1

请改用InStr功能。它返回一个整数，指定第一次出现在另一个字符串中的起始位置。

If InStr(emlSubj , strSubj) > 0 Then
   Debug.Print strSubj
End If