1-16、循环语句FOR NEXT-正真的应用从这里开始(1) 手机观看
APP扫描二维码打开
手机使用APP
学习更轻松
/ 350
添加表情
遵守中华人民共和国的各项道德法规,承担因您的行为而导致的法律责任,
本站有权保留或删除有争议评论。 参与本评论即表明您已经阅读并接受上述条款。
全部评论 (共 30 条)
HBEZNX 展开
Dim i, num As Integer, rng As Range

For num = 2 To Cells(Rows.Count, 2).End(xlUp).Row

Set rng = Cells(num, 4)

i = Cells(num, 2) * Cells(num, 3)

rng = i

Next
2022年04月09日 22:04
0 回复
M-udb2tkfxa 展开
感谢互联网,感谢曾老师,带给了我们自觉的机会,我是一年级数学老师,学过函数以后又来学习VBA,给我的工作带来了很大的便利,特别是给学生出口算题,现在可以做到一样的题目,班上所有人的卷不一样,别的老师都认为很神奇,我在他们心目中很神秘,这就是学习带来的成绩感[开心],我觉得,学习VBA还是需要一定的编程和函数基础,这些我都有一点儿,所在学到现在还能接受。天天学习,天天进步,很开心!
2021年02月14日 11:24
5 回复
学习达人
遨游智海洋 展开
我又反反复复回来看这些章节 不然后面的话你掌握不了
2020年11月09日 10:01
3 回复
游客 展开
尾端视频不显示。
2016年08月08日 18:02
2 回复
yuming4436 展开
sub test( )
dim a %
for a=2 to 14
cells(a,4)=cells(a,2)*cells(a,3)
next a
end sub
@王大西
2020年01月16日 19:23
1 回复
游客 展开
Sub 计算金额()
i = 2
Do While Cells(i, 2) <> ""
i = i + 1
Loop
For num = 2 To (i - 1)
Cells(num, 4) = Cells(num, 2) * Cells(num, 3)
Next num
End Sub
2018年10月04日 13:19
1 回复
我的成功之路 更多
V
特惠充值
联系客服
APP下载
官方微信
返回顶部