EXCEL 初学VBA， 编个小程序；
答案:1 悬赏:20 手机版
解决时间 2021-03-08 16:49
- 提问者网友：临风不自傲
- 2021-03-08 04:57
EXCEL 初学VBA， 编个小程序；
最佳答案
- 五星知识达人网友：空山清雨
- 2021-03-08 06:07
我也是初学者，相互学习
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追问col是什么？追答变量，循环B2:D2追问已经设置col=2了，Cells(2, col)，不只是B2了吗？追答For i = 1 To 3 '循环执行3次
If Cells(2, col).Value >= 90 Then '如果满足条件
j = j + 1 '计数器J加1
End If
col = col + 1 '列号+1，既下次判断Cells(2,3)，C2
Next追问感谢，我还没有学到循环引用的。
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追问col是什么？追答变量，循环B2:D2追问已经设置col=2了，Cells(2, col)，不只是B2了吗？追答For i = 1 To 3 '循环执行3次
If Cells(2, col).Value >= 90 Then '如果满足条件
j = j + 1 '计数器J加1
End If
col = col + 1 '列号+1，既下次判断Cells(2,3)，C2
Next追问感谢，我还没有学到循环引用的。
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯