8个回答
展开全部
可以用offset和match函数查询
例如查询A列中“ABC”单元格上一个单元格数据
=offset(A1,match("ABC",A:A,)-2),)
例如查询A列中“ABC”单元格上一个单元格数据
=offset(A1,match("ABC",A:A,)-2),)
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
按alt+F11,插入--模块
复制下面代码
然后选择你要添加批注的地方
运行代码
Sub 返回指定数字的上一单元格()
Dim i As Long
Dim j As Long
Dim n As Variant
j = 1
i = 2
n = InputBox("请输入你要查找的数字")
If n = "" Then Exit Sub
Range("b:b").Clear
n = n * 1
For i = 2 To 65000
If Cells(i, 1) = "" Then MsgBox "已完成搜索": Exit Sub
If Cells(i, 1) = n And Application.WorksheetFunction.CountIf(Range("b:b"), Cells(i - 1, 1).Value) = 0 Then
Cells(j, 2).Value = Cells(i - 1, 1).Value
j = j + 1
End If
Next i
End Sub
Sub 返回指定数字的上一单元格1()
Dim i As Long
Dim j As Long
Application.ScreenUpdating = False
Range(Cells(2, 2), Cells(10000, 11)).Clear
For n = 0 To 9
j = 2
For i = 2 To 65000
If Cells(i, 1) = "" And n = 9 Then MsgBox "探索已完成": Exit Sub
If Cells(i, 1) = "" Then Exit For
If Cells(i, 1) = n And Application.WorksheetFunction.CountIf(Range(Cells(1, (n + 2)), Cells(199999, (n + 2))), Cells(i - 1, 1).Value) = 0 Then
Cells(j, n + 2).Value = Cells(i - 1, 1).Value
j = j + 1
End If
Next i
Next n
Application.ScreenUpdating = True
End Sub
”返回指定数字的上一单元格“这个是找你想要的数字,并去掉重复后输出在B列
“返回指定数字的上一单元格1”,这个是找0到9,并去掉重复后,从B列开始,每个结果对应一列
并且都是从第二行开始,你可以在第一行做标记
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如数据在A1:A100,在B1中输入公式:=IF(ISERROR(INDEX(A$1:A$100,SMALL(IF(A$1:A$100=3,ROW($1:$100)),ROW(Z1))-1)),"",INDEX(A$1:A$100,SMALL(IF(A$1:A$100=3,ROW($1:$100)),ROW(Z1))-1)) ,同时按下ENTER键,SHIFT键,和CTRL键,公式下拉,即可。
更多追问追答
追问
您好 还是不太理解 可以说说你的qq加你好友吗 谢谢
追答
我的QQ号是:956-084-023
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐于2016-07-14 · 知道合伙人数码行家
关注
展开全部
方法:
vlookup即可满足
例如有表sheet1、表sheet2 ,现要查询表sheet1内的结果返回到表sheet2 单元格b1,a1为表sheet2中,公式如下:
b1=vlookup(a1,sheet1!a1:b10,2)
vlookup即可满足
例如有表sheet1、表sheet2 ,现要查询表sheet1内的结果返回到表sheet2 单元格b1,a1为表sheet2中,公式如下:
b1=vlookup(a1,sheet1!a1:b10,2)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询