倒计时循环的限制

我有以下简单的Excel电子表格：

ABC 1 10 2 =B1+A2 3 =SUMME(B1:B2) 4 

在单元格A2中，计数值由以下macros插入：

 Sub test () Sheets("Sheet1").Range("A2").Value = Sheets("Sheet1").Range("A2").Value - 1 Do Until Sheets("Sheet1").Range("B3") > 0 Sheets("Sheet1").Range("A2").Value = Sheets("Sheet1").Range("A2").Value - 1 Loop End Sub 

迄今为止，这一切正常。 但是，现在我想限制macros中的循环。 所以它应该只在A2单元格倒计数，直到达到0，它不应该低于0。

你有什么想法如何在我的代码中插入这样的“限制”？

Answer 1

它不应该低于0。

在写入值之前，检查它是否<0并简单地退出Do循环。

这是你想要的吗？

 Do Until Sheets("Sheet1").Range("B3") > 0 If Sheets("Sheet1").Range("A2").Value - 1 < 0 Then Exit Do Sheets("Sheet1").Range("A2").Value = Sheets("Sheet1").Range("A2").Value - 1 Loop