题目
vba公式求助
用vba公式,a列中有几组数字如:123456,456789,741852,963852,452783.如果a列同时含有2、5、6时,则b列等于0,否则b列加1,
用vba公式,a列中有几组数字如:123456,456789,741852,963852,452783.如果a列同时含有2、5、6时,则b列等于0,否则b列加1,
提问时间:2021-04-09
答案
如果用VBA的话,假如数据在a1:a100中,请在VBA编辑器中输入:
Sub Lookup256()
For i = 1 To 100
If (Cells(i, 1) Like "*2*" And Cells(i, 1) Like "*5*" And Cells(i, 1) Like "*6*") Then
Cells(i, 2) = 0
Else
Cells(i, 2) = 1
End If
Next i
End Sub
Sub Lookup256()
For i = 1 To 100
If (Cells(i, 1) Like "*2*" And Cells(i, 1) Like "*5*" And Cells(i, 1) Like "*6*") Then
Cells(i, 2) = 0
Else
Cells(i, 2) = 1
End If
Next i
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1甲、乙、丙三容器内各盛有水若干毫升,现将甲的水倒一些到乙中,使乙的水加倍;然后把乙的水倒一些到丙中
- 2she is the first woman player()such a prize
- 3在同一平面内,下列正确的是: A.经过一点有且只有一条直线已知直线平行 B.一个角的补角等于这个角2倍
- 4用“绘声绘色”“名副其实”造句
- 5腐植酸能螯合哪些金属离子,与EDTA相比腐植酸螯合的优缺点有哪些!
- 615除13分之10等于
- 7水平面上有重为20牛的物体,在水平拉力的作用下,以每秒两米的速度做匀速直线运动.若物体受到的摩擦力为
- 8六年级学生种樟树比种广玉兰树少60棵,樟树是广玉兰树的80%,种广玉兰树多少棵?
- 9Does he go online at home every day?用at the moment改写
- 102010宣武区初三二模英语试卷及答案~
热门考点
- 1苏教七年级下学期语文课文填空练习
- 2DARLING
- 3每空一词 英语
- 4.Which letter is the most hardworking one?的翻译
- 5八年级下册数学题啊,实在是不会做了啊,教教我吧
- 6春节时用诗句,爆竹声中辞旧岁,---------------.
- 71个棱柱有7个面,那么这个棱柱共有几条棱
- 81.有一种调光台灯,通过调节旋钮改变灯泡两端的实际电压,从而调节灯泡的亮度.已知灯泡的铭牌上标有“220V 60W”字样,设灯泡的电阻不变.⑴灯泡两端的实际电压为110V时,灯泡的实际功率是多少?⑵当
- 9汉唐宋元实行怎样的对外政策
- 10仅考虑核DNA,下列人体细胞中染色体数可能相同,而DNA含量一定不同的是