永发信息网

vba正负数个数怎么求

答案:2  悬赏:20  手机版
解决时间 2021-04-05 22:43
vba正负数个数怎么求
最佳答案
Sub xx() Dim c As Range n = Cells(4 ^ 8, "i").End(3).Row + 1 j = 0 k = 0 For Each c In Range("c13:i" & n) If c.Interior.ColorIndex = 5 Then j = j + 1 k = k + c End If Next If j <= 2 Then MsgBox "蓝色单元格少于或等于2" Else [a7] = k Mod 10 End IfEnd Sub
全部回答
参考 觉得条件成立,就可以了,你的代码用了两次条件成立。 if msgbox(“条件成立”,vbyesno)= vbyes then else exit sub end if for i = 1 to mx
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
请问根德、索尼、山进收音机和国产其他品牌那
单选题下列有关“一定”的说法正确的是A.没有
有没有,什么办法找到一个人?在她不知道的情
携程网火车票怎么取,我怎么取消携程网火车票
哪位大师帮忙写藏头诗,马虹霞
To keep the air clean, this hospital all
太监了是什么意思,“本书太监了”是什么意思
蜘蛛网电影票电影通兑券是什么?
想知道:济宁市 从汶上汽车站到曲阜汽车站怎么
为什么我爸进我屋之前不敲门,出去之后不关门
哪些有名的小说网站免费注册作者,不要填身份
英语.完成对话:如下:
当女生没有男生追她的时候即使这个男生她不喜
急。。。没有蓝色染料了。怎么用其他颜色的调
倩碧保质期怎么看,倩碧2号水生产日期及保质期
推荐资讯
单选题2006年8月24日,国际天文学联合大会通
树有心眼,又住一起
大众途观点火线圈怎么共电
洛奇英雄传中有没有疲劳值
西餐里长的像蛋黄的海鲜是什么
求7319 9089 5240 6785753爱情密码是什么意思
小米刷机中提示帐号与设备没有绑定关系怎么办
讴歌是哪个国家的?
南瓜汤好喝么?怎么做南瓜汤?
空灵造句空灵怎么造句啊啊
丝袜如女友,你爱哪一款
刚出生的婴儿一次喝多少毫升奶粉
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?