如果 Count 超过 _ 数量，并且 FileName 不包含 _

如何解决如果 Count 超过 _ 数量，并且 FileName 不包含 _

我正在寻找构建我的 IF,Then,Else 语句的正确方法来处理我报告中所有可能出现的情况。我错过了一些基本的东西，因为它没有按我预期的那样工作。

规则是：

如果变量 (fCount) 出现的次数超过 6，但文件名 (fName) 不包含字符串“RADMON”，则保存报告。 但是，如果 fName 确实包含“RADMON”并且超过 250，则保存报告。 如果两者都不是，则不要保存它并终止报告。

我目前的结构是这样的：

If fCount > 6 And Not InStr(1,fName,"RADMON",vbTextCompare) = 0 Then 
  ActiveWorkbook.Save 
ElseIf InStr(1,vbTextCompare) = 0 And fCount >= 250 Then 
  ActiveWorkbook.Save
Else
  ActiveWorkbook.Close
  Kill

结果是 fCount 超过 6 但 fName 不包含“RADMON”的报告被我的代码主动杀死。我想我对如何测试 fName 有一个根本的误解。换句话说，我不知道 Instr 是如何工作的。有人给我指导吗？

解决方法

您的第一个 if 语句是双重否定。 InStr 函数将返回找到的字符串的位置。 InStr(1,fName,"RADMON",vbTextCompare) = 0 表示未找到该字符串，Not InStr(1,vbTextCompare) = 0 表示如果 fCount 大于 6 并且找到“RADMON”，则保存文件。

If fCount > 6 And InStr(1,vbTextCompare) = 0 Then 
  ActiveWorkbook.Save 
ElseIf InStr(1,vbTextCompare) > 0 And fCount >= 250 Then 
  ActiveWorkbook.Save
Else
  ActiveWorkbook.Close
  Kill
End if