早教吧作业答案频道 -->其他-->
vba公式求助用vba公式,a列中有几组数字如:123456,456789,741852,963852,452783.如果a列同时含有2、5、6时,则b列等于0,否则b列加1,
题目详情
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,
▼优质解答
答案和解析
如果用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
看了 vba公式求助用vba公式,...的网友还看了以下:
数轴上有个点A,B,P,C,D,已知AP=PD=3,且AB=BC=CD,点P对应有理数1,则A,B 2020-04-08 …
微积分啊.1.设y"=lnx,且x=1时y=-1,则y=?2.若已知∫(0到pai)dx∫(0到p 2020-05-13 …
某化合物的化学式HnRO2n,则R的化合价中n为_____;若R的化合价中n为奇数1,则R的氧化物 2020-05-16 …
点PM(M,N)满足2M+N=0,点AM(M,B)满足2M+B=1(1)请写出点P0,P1,P2, 2020-05-17 …
一位同学在火车上根据车轮通过两段钢轨交接处时发出的响声来估测火车的速度,他从车轮的某一次响声开始计 2020-05-17 …
一次函数y=kx+b满足x=0,y=-1当x=1时,y=1则这个一次函数的解析式是? 2020-05-22 …
根据洛沦茨曲线图可以计算基尼系数,当B=0时,G=1,则表示( )。A.收入分配绝对平等B.收入分配 2020-05-30 …
已知二元一次方程ax+by=1,当x-1时y=3,当x=1时y=1,则a=b= 2020-06-02 …
一个分数的分母若加4恰好是9/10,若分子加1可化简得到整数1,则这个分数是----------- 2020-07-30 …
业务员工资分段抽成的函数计算公式.假如本月业绩小于基数*0.85,则抽成为零.若大于基数*0.85 2020-07-30 …