6个回答
展开全部
选择有效性的那个单元格-点数据-有效性-条件-任何数据-确定
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
sub
tt()
dim
th,
aa,
i&
dim
nr
nr
=
range("a1").validation.formula1
th
=
split(nr,
",")
for
i
=
0
to
ubound(th)
aa
=
aa
+
val(th(i))
next
cells(1,
2)
=
aa
end
sub
给你模型你
参考
这是把a1的数据有效性求和在b1里面
具体的你可以修改
sub
tt()
dim
th
dim
nr
nr
=
range("a1").validation.formula1
'这是内容
th
=
replace(nr,
",",
"+")
'这是把内容里面的,替换成+
cells(2,
2)
=
application.evaluate(th)
'执行计算
在单元格输出结果
end
sub
第一段是别人帮我的
这是我自己写的我的意思是把数据有效性数值取出来
替换掉,为+再用application.ealuate计算的
绕弯了!
tt()
dim
th,
aa,
i&
dim
nr
nr
=
range("a1").validation.formula1
th
=
split(nr,
",")
for
i
=
0
to
ubound(th)
aa
=
aa
+
val(th(i))
next
cells(1,
2)
=
aa
end
sub
给你模型你
参考
这是把a1的数据有效性求和在b1里面
具体的你可以修改
sub
tt()
dim
th
dim
nr
nr
=
range("a1").validation.formula1
'这是内容
th
=
replace(nr,
",",
"+")
'这是把内容里面的,替换成+
cells(2,
2)
=
application.evaluate(th)
'执行计算
在单元格输出结果
end
sub
第一段是别人帮我的
这是我自己写的我的意思是把数据有效性数值取出来
替换掉,为+再用application.ealuate计算的
绕弯了!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
数据--有效性--设置--任何值~
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
选中,然后依次执行菜单如下:
Data->Validation->Seting->Any value.
Data->Validation->Seting->Any value.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询