EXCEL多条件取数
答案:2 悬赏:70
解决时间 2021-02-07 21:38
- 提问者网友：孤笛钟情你
- 2021-02-06 23:08
EXCEL多条件取数
最佳答案
- 二级知识专家网友：颜值超标
- 2021-02-06 23:29
假设 数组在 A1单元格 然后里面数字放在 B1单元格 宏代码：
Sub Get_Num（）
Dim Value as String
Dim i as integer
Value=Cell(1,1).value 'Value Of A1
for i=1 to Len(Value)
If ASC(Mid(Value,i,1))>=ASC(0) and ASC(Mid(Value,i,1))<=ASC(9) then
Cell(1,2).value = Cell(1,2).value & Mid(Value,i,1) 'Put In B1
End if
next i
end Sub
Sub Get_Num（）
Dim Value as String
Dim i as integer
Value=Cell(1,1).value 'Value Of A1
for i=1 to Len(Value)
If ASC(Mid(Value,i,1))>=ASC(0) and ASC(Mid(Value,i,1))<=ASC(9) then
Cell(1,2).value = Cell(1,2).value & Mid(Value,i,1) 'Put In B1
End if
next i
end Sub
全部回答
- 1楼网友：恕我颓废
- 2021-02-07 01:06
=if(and(a1>=80,a1<85),50,"")
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯