循环有好几种的写法,但是我认为,新手或者用的不熟练的还是写for循环比较 稳妥,不至于陷入无限循环
循环 的框架为:
For i = 1 To 结束
Next
其中的i 需要定义一下 dim i
按照上一个情况的判断,增添循环进去

首先先要搞清楚 结果需要写在哪里,从多少到多少 按照上面图片 ,就是将结果写入C2\C3\C4
那么就是从C2-C4, C是列不动,变的数值也就是2、3、4,对于数据也是从A2到A4,B2到B4.

Sub panduan()
Dim i
For i = 2 To 4
If Range("B" & i).Value > 55 Then
Range("C" & i) = "是"
Else
Range("C" & i) = "否"
End If
Next
End Sub

写循环语句想调试的时候,使用F8单步跟踪比较好,知道哪里会出错
大家可以先写一些简单的,循环,可以从A1:B6的数据 循环写入到 C9到D14.看看有什么共性


没有回复内容