excel中,如果B1不等于C1,返回A1,如果B1=C1,则继续检查B2与C2是否相等,不等则返回A2,相等则继续检查
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/12 18:07:16
excel中,如果B1不等于C1,返回A1,如果B1=C1,则继续检查B2与C2是否相等,不等则返回A2,相等则继续检查B3与C3,直至B与C最后一个不为空的单元格,大侠帮帮忙,公式和VBA均可
最后一个不为空的B列单元格等于C列单元格,返回什么值?
再问: 返回A列对应的值
再答: 请测试!结果生成在G1单元格。Sub test()
Dim ar
Dim i As Long
ar = Range("A1:C" & Cells(Rows.Count, 2).End(3).Row)
For i = 1 To UBound(ar)
If ar(i, 2) <> ar(i, 3) Then
Cells(1, 7) = ar(i, 1)
Exit Sub
End If
Next i
Cells(1, 7) = ar(i - 1, 1)
End Sub
再问: 不好意思 错了 不是返回A列的值,是返回空值
再答: Sub test()
Dim ar
Dim i As Long
ar = Range("A1:C" & Cells(Rows.Count, 2).End(3).Row)
For i = 1 To UBound(ar)
If ar(i, 2) <> ar(i, 3) Then
Cells(1, 7) = ar(i, 1)
Exit Sub
End If
Next i
Cells(1, 7) = ""
End Sub这样吗?
再问: 大侠,具体该怎么在excel中操作啊,如果我想返回值在D列,然后按钮该怎么弄啊
再答: 你把前3列的数据复制到我的表中,单击按钮试试!P.S. 代码已修改输出值位置为D1单元格
再问: 返回A列对应的值
再答: 请测试!结果生成在G1单元格。Sub test()
Dim ar
Dim i As Long
ar = Range("A1:C" & Cells(Rows.Count, 2).End(3).Row)
For i = 1 To UBound(ar)
If ar(i, 2) <> ar(i, 3) Then
Cells(1, 7) = ar(i, 1)
Exit Sub
End If
Next i
Cells(1, 7) = ar(i - 1, 1)
End Sub
再问: 不好意思 错了 不是返回A列的值,是返回空值
再答: Sub test()
Dim ar
Dim i As Long
ar = Range("A1:C" & Cells(Rows.Count, 2).End(3).Row)
For i = 1 To UBound(ar)
If ar(i, 2) <> ar(i, 3) Then
Cells(1, 7) = ar(i, 1)
Exit Sub
End If
Next i
Cells(1, 7) = ""
End Sub这样吗?
再问: 大侠,具体该怎么在excel中操作啊,如果我想返回值在D列,然后按钮该怎么弄啊
再答: 你把前3列的数据复制到我的表中,单击按钮试试!P.S. 代码已修改输出值位置为D1单元格
excel中,如果B1不等于C1,返回A1,如果B1=C1,则继续检查B2与C2是否相等,不等则返回A2,相等则继续检查
如果EXCEL表格中A1=0则C1=B1,A2=0则C1=B2
请问:在excel中,如何设置“如果C1=A1-B1,则C2=C1+A2或C2=C1-B2,C3=C2+A3或C3=C2
EXCEL中 将单元A2和A1,B2和B1,C1和C2,比较如果全部相等执行,D1=(K1*L1)*43200/(K1*
excel中 A1 B1 C1 D1 A2 B2 C2 D2 其中C1=A1+B1,D1=B1*C1 ,C2=A2+B2
求行列式,设a1 b1 c1;a2 b2 c2;a3 b3 c3=3 ,则 a1+3b1 c1 b1;a2+3b2 c2
在excel中 A2=A1 B2=A1+B1 C2=A1+B1+C1 D2=A1+B1+C1+D1计算这样数值的公式吗?
输入到C2.如果C1=A1,显示B1.C1=A2,显示B2.C1=A3,显示B3以此类推.
-2.36*a1/b1公式中,如果b1为0,则c1返回-2.36.应如何编写公式呢?
在EXCEL中如果A1=B1,C1=B1=A1.A1>B1,C1=B1-(A1-B1).A1
在EXCEL中,=sum(A1*A2+B1*B2+C1*C2+++n1*n2)?
请问:如果A1、B1、C1、D1中任一数等于5,并且A2、B2、C2、D2中任一数等于6,则显示为“对”……