急!跪求VBA代码 Do--Loop文

发布网友发布时间：2024-10-19 21:47

我来回答

共2个回答

热心网友时间：2024-11-18 07:02

sub sum()

total=range("C11")
raneg("D11")=total
do while i<range("b1:b65000").end(xldown)

total=total+range("C"&i).value
range("D"&I)=total
i=i+1
loop
end sub

热心网友时间：2024-11-18 07:02

sub s()
dim total
total=0
[C11].select
do
    total=total+ ActiveCell.Value
    ActiveCell.offset(0,1)=total
    ActiveCell.offset(1,0).select
loop until ActiveCell=""
end sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

猜你喜欢

热门推荐

产品服务发展历程企业资讯企业文化关于我们加入我们联系我们网站导航网站律师

中国扫黄打非网

赣ICP备2023002352号-2

违法及侵权请联系：TEL:177 7030 7066 E-MAIL:11247931@qq.com 本站由北京市万商天勤律师事务所王兴未律师提供法律服务

急!跪求VBA代码 Do--Loop文

最新推荐

猜你喜欢

热门推荐