假设数据在第一行
VBA用两种方法计算一行有多少个数字
第一种用excel内置函数
第二种不用excel内置函数
EXCEL用VBA计算一行有多少个
答案:2 悬赏:0 手机版
解决时间 2021-03-11 10:26
- 提问者网友：疯子也有疯子的情调
- 2021-03-10 21:44
最佳答案
- 五星知识达人网友：琴狂剑也妄
- 2021-03-10 22:29
第一种用excel内置函数
set rng = range("a1:Z1")
a = application.worksheetfunction.count(rng)
第二种不用excel内置函数
set rng = range("a1:Z1")
for each cel in rng
a = a+iif(cel.value<>"" and isnumeric(cel.value),1,0)
next
a 的结果就是有几个数字
set rng = range("a1:Z1")
a = application.worksheetfunction.count(rng)
第二种不用excel内置函数
set rng = range("a1:Z1")
for each cel in rng
a = a+iif(cel.value<>"" and isnumeric(cel.value),1,0)
next
a 的结果就是有几个数字
全部回答
- 1楼网友：雪起风沙痕
- 2021-03-11 00:04
i = 0
for each c in range("a" & [a1048576].end(xlup).row & ":bz" & [a1048576].end(xlup).row)
if c.interior.colorindex <> -4142 then i = i + 1
next
[b2] = "【" & i & "】"
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯