我需要在 For Next 循环中使用 VBA If Else 语句
我尝试了各种语句的排列,但它们都出错了。
Sub TestForIfElse()
Dim Counter As Integer
Dim i As Integer
For i = 1 To 5
Counter = i
If Counter > 3 Then
Exit For
Else
Next i 'ERROR NEXT WITHOUT FOR
End Sub
运行循环直到满足测试要求。
如果测试未满足,请继续
如果测试满足,则退出循环。感谢您的帮助。
这会起作用:
Sub TestForIfElse()
Dim Counter As Integer
Dim i As Integer
For i = 1 To 5
Counter = i
If Counter > 3 Then
Exit For
End If
Next i
End Sub
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)