避免在excel vba中复制While-Wend循环

Question

我在Excel VBA中循环播放时非常庞大。

在代码的前面，我将变量strMode设置为True或False。

如果是False那么在我的状态下我想设置

while var1 + var1previous > 1 

如果是True

while var1 + var1previous > 1 or var1previous+ var1  > 1

我怎么能这样做，如果我不知道＆＃34;加倍＆＃34;我的If语句的While-Wend代码？

Answer 1

我会猜测你要做什么，因为就像@Gserg提到的那样，

你的第二个条件看起来是一样的。

我将调用var1 + var1previous＆gt; 1条件 Cond_A 以及您之后使用的第二个条件或 Cond_B

Cond_A = var1+var1previous ' This will be first condition
Cond_B = 0
If strMode then Cond_B = var1+var1previouis 'This will be second condition

While Cond_A > 1 or Cond_B > 1   

我上面所做的是，当strMode值为true时，您将比较两种情况。

当strmode为false时，则因为第二个条件已经设置为false

由于或，它只会比较Cond_A和循环。