懂vba的师傅来帮帮忙。怎样改变程序的执行顺序。以下面代码为例;

2025-05-05 21:56:27
推荐回答(2个)
回答1:

你试试下面这样行不行:
Sub 判断_Click()

For I = Range("A100000").End(xlUp).Row To 3 Step -1

If Range("b" & (I + 1)) = 5 Then
Range("q" & I) = "优秀"
Else
Exit For
End If
Next
End Sub

回答2:

Sub a()
Dim i%, n%
n = Sheet1.Range("A65536").End(xlUp).Row
 
For i = n To 3 Step -1
    If Sheet1.Cells(i + 1, 2) = 5 Then Sheet1.Cells(i, 17) = "优秀"
Next i
 
End Sub