If-Then语句循环

Question

我创建了一个If-Then语句代码，如果有重复的话，它将打开一个消息框。

我的问题是，当有重复项时，我无法退出消息框。就像是一个循环。

我的代码在这里：

H

顺便说一下，R​​ange（“ O1”）包含的公式将查找工作表“通过雅思”中的所有重复项。

任何帮助将不胜感激！

Answer 1

好吧，当对O1单元具有修改效果的单元中发生更改时，仅运行if-Then部分 是一个很好的选择。

为此使用目标参数：

  If Not Application.Intersect(Target, RangeWhichAffectsThisCell) is Nothing Then

‘Your code comes here

End if

另一种方式：

在代码末尾，删除导致MessageBox弹出的申请人条目（无论其单元格在哪里）。我假设这会将O1单元格设置为“ False”。

但是，我们不知道所有细节，因此我们无法为您提供100％准确的答案。