Excel 如果条件满足,则更改循环方向
我试图做一个循环,如果ZuluLY>ZuluTY,它将逐步进行,如果ZuluExcel 如果条件满足,则更改循环方向,excel,vba,loops,for-loop,Excel,Vba,Loops,For Loop,我试图做一个循环,如果ZuluLY>ZuluTY,它将逐步进行,如果Zulu
If ZuluLY > ZuluTY Then
For yr = LBound(Year_Arr) To UBound(Year_Arr)
ElseIf ZuluLY < ZuluTY Then
For yr = UBound(Year_Arr) To LBound(Year_Arr) Step -1
End If
'..... code
啊哈!我没有想过把它分配给一个变量。非常感谢你,蒂姆!
Dim vStart, vEnd, vStep
If ZuluLY > ZuluTY Then
vStart = LBound(Year_Arr)
vEnd = UBound(Year_Arr)
vStep = 1
else
vStart = UBound(Year_Arr)
vEnd = LBound(Year_Arr)
vStep = -1
end if
For yr = vStart To vEnd Step vStep