发布网友 发布时间:2022-04-24 05:43
共1个回答
热心网友 时间:2023-11-02 01:00
我也是初学者,相互学习 Sub test() Dim i%, j%, col% j = 0 col = 2 For i = 1 To 3 If Cells(2, col).Value >= 90 Then j = j + 1 End If col = col + 1 Next If j >= 2 Then Cells(2, 6) = 100 End If End Sub
热心网友 时间:2023-11-02 01:00
我也是初学者,相互学习 Sub test() Dim i%, j%, col% j = 0 col = 2 For i = 1 To 3 If Cells(2, col).Value >= 90 Then j = j + 1 End If col = col + 1 Next If j >= 2 Then Cells(2, 6) = 100 End If End Sub
热心网友 时间:2023-11-02 01:00
我也是初学者,相互学习 Sub test() Dim i%, j%, col% j = 0 col = 2 For i = 1 To 3 If Cells(2, col).Value >= 90 Then j = j + 1 End If col = col + 1 Next If j >= 2 Then Cells(2, 6) = 100 End If End Sub
热心网友 时间:2023-11-02 01:00
我也是初学者,相互学习 Sub test() Dim i%, j%, col% j = 0 col = 2 For i = 1 To 3 If Cells(2, col).Value >= 90 Then j = j + 1 End If col = col + 1 Next If j >= 2 Then Cells(2, 6) = 100 End If End Sub
热心网友 时间:2023-11-02 01:00
我也是初学者,相互学习 Sub test() Dim i%, j%, col% j = 0 col = 2 For i = 1 To 3 If Cells(2, col).Value >= 90 Then j = j + 1 End If col = col + 1 Next If j >= 2 Then Cells(2, 6) = 100 End If End Sub