/ 350
添加表情
遵守中华人民共和国的各项道德法规,承担因您的行为而导致的法律责任,
本站有权保留或删除有争议评论。 参与本评论即表明您已经阅读并接受上述条款。
全部评论 (共 72 条)
学习达人
老来自学 展开
Sub 尝试()
Dim rs%
For rs = 2 To 10
If Cells(rs, 2) >= 90 Then Cells(rs, 3) = "√"
Next rs
End Sub

这个实例,使用for。。。next好像更简单。
2023年09月04日 15:40
0 回复
z18858664123 展开
If Cells(rs, 2) >= 90 Then Cells(rs, 3) = "√"这句为什么不能分行呢,一分行就提示loop没有do
2022年04月30日 08:53
1 回复
T-as1ate5kf 展开
@ tsnh9017 老师,有联系方式吗?请教一个问题
2023年03月01日 14:50
@TA
tsnh9017 展开
@ z18858664123 分行后面就要多加一句end if
2022年05月15日 17:32
@TA
红色-枫叶 展开
@ z18858664123 我这也是一样
2022年05月11日 10:34
@TA
WXaf4ryisjn 展开
特殊符号怎么弄出来啊,我这边找不到啊,显示问号
2022年04月09日 18:05
0 回复
游客 展开
RS只是随便喊的一个东西啊,你们想啥呢????一般这种循环变量用i比较多
2019年10月01日 23:27
2 回复
学习达人
T-uthmbev68 展开
Sub dd1()
Dim ass%
ass = 0
Do
ass = ass + 1
If ass > 19 Then
Exit Do
else cells(ass,1)>=82 Then Cells(ass, 4) = "ok"
End If
Loop
End Sub
结果:else cells(ass,1)>=82
缺少:=[惊讶]
2022年03月27日 20:31
0 回复
hujialing 展开
IF和rs退格几个字符,看的不是很清晰
2021年02月04日 14:28
0 回复
我的成功之路 更多
V
特惠充值
联系客服
APP下载
官方微信
返回顶部