永发信息网

excel vba结果输出不对

答案:3  悬赏:70  手机版
解决时间 2021-03-22 09:56
excel vba结果输出不对
最佳答案
sub aaa
dim n%
for n = 1 to application.counta(sheets(1).range("a:a"))
if cells(n,6)<500 then
cells(n,7)=1
else
cells(n,7)=0
end if
next
end sub
全部回答
这种情况就不该用FOR EACH
你这样嵌套的话,每个aa都要循环一遍bb
相当于bb的值都是由F10来判断出来的
Sub a()
    For Each aa In Range("f4:f10")
        If aa.Value < 500 Then
            aa.Offset(0, 1) = 1
        Else
            aa.Offset(0, 1) = 0
        End If
    Next
End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
张明同学喜欢看央视《国宝档案》栏目,他惊叹
白火寨我想知道这个在什么地方
英语某东西多少钱怎么造句
有没有经典好笑的囧言囧语啊
建筑工地防台风措施
深圳哪里配眼镜比较好,在厦门配眼镜去哪里比
iphone6会因为温度太低自动关机吗
古龙小说里,燕十三的最后悟出的第十五剑跟叶
汽车零件机械加工工艺卡片中的特性ZY是什么意
2010年2月27日凌晨智利附近海域发生里氏8.8级
问道敏火怎么玩,问道贺喜活动九重天要多少蛋
嘉银塑机在什么地方啊,我要过去处理事情
如何手动关闭所有电脑风扇???
怎么感觉《树读》像熊出没的插曲
最近我的手机触摸屏点下去屏幕里面好像有水一
推荐资讯
锤片对锤式粉碎机有哪些影响
一首歌女生唱的,有拍手声,拍鼓声,挺柔和的,
海涛汽车维修(育英街)地址在哪,我要去那里办
在哪里可以买到塔罗牌?价格?
My sister keeps phone calls her friends
稻花香里说丰年,听取蛙生一片.丰年是什么意
大众polo 黄色1.4怎么样
收费员王某为增加其工作量进行分解收费操作是
150厘米的女孩生孩子会不高吗?不会成剩女吧?
关于缝纫机,绷缝机的基本问题。预购,但不了
根据下列装置图,按要求回答有关问题:(1)
手机wifi需重启才能打开
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?