[已解决]如何向上查找遇到的第一个数

zfm3408 · 发表于 2010-2-9 17:12

如何向上查找遇到的第一个数，并自动把距离填到另一个表格中。如下：要查的数列中的数字会重复出现，当再重复出现的时候，会引起其它的距离的相应变化。最近出现的6的距离为1，最近出现的7的距离为5，最近出现的3的距离为9，最近出现的2的距离为11；当6后面再次出现2时，则2的最近出现的距离会自动变为1，而6的距离会变成2，5的距离会变成3，

要查的数列	最近遇到的第一个数的距离（这列是为了说明的需要）	要查的数	最近遇到的第一个数的距离（能够自动变化）
7		1	4
2		2	11
8	16	3	9
2		4	13
4		5	2
4	13	6	1
5		7	5
2	11	8	16
1		9	10
3	9	10	9
5
5
6
7	5
1	4
9	3
5	2
6	1

最佳答案

月排行榜 / 总排行榜

dsmch

2010-2-9 17:30

QorqjqSX.rar (6.32 KB, 下载次数: 170)

dsmch · 发表于 2010-2-9 17:30

QorqjqSX.rar (6.32 KB, 下载次数: 170)

喜多多 · 发表于 2010-2-9 17:40

=IF(COUNTIF($A$1:$A$18,D2),INDEX($B$1:$B$18,MAX(IF($A$1:$A$18=D2,ROW($1:$18)))),"查无此人")

数据在A，B列

喜多多 · 发表于 2010-2-9 18:51

自定义函数

Function findlate(rng As Range, rng1 As Range)
Application.Volatile
findlate = rng1.Find(what:=rng.Value, searchdirection:=xlPrevious).Offset(, 1)
End Function

用法，findlate(参数1，参数2)

参数1，是要查找的内容，参数2，要查找内容所在的区域(Range)。

例：findlate(A1,A1:A3)=1

A B

1 6

2 8

1 2

		自动登录	找回密码
密码			注册