Избегайте дублирования While-Wend loop in excel vba

Question

У меня очень большой цикл wend в моем Excel VBA.

Ранее в коде я установил переменную strMode в True или False.

Если False то в моем состоянии в то время как я хочу, чтобы установить

while var1 + var1previous > 1 

и если это True

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

Как я могу это сделать, если я не то, что " double "код While-Wend, для моего заявления If?

Answer 1

Я собираюсь предположить, что вы пытаетесь сделать, потому что так же, как упомянуто @Gserg,

ваше второе условие выглядит так же.

---

Я собираюсь позвонить var1 + var1previous> 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 верно то вы сравниваете оба условия.

Когда strmode является ложным, то, так как второе условие уже установлен в ложном

и из-за или это будет просто сравнить Cond_A и петли.