excel查找某列数据中某重复数据对应的其他列的值

一个通用的“查找某列数据中某重复数据对应的其他列的值”的自定义函数

Public Function getnames(fenshu As Range, k As Range, s As Integer)
Dim i As Integer
Dim ii As Range
Dim Smax As String
Smax = “”
j = k.Column
For Each ii In k.Cells
i = ii.Row
If Cells(i, j).Value = fenshu Then
If Smax = “” Then
Smax = Cells(i, s).Value
Else
Smax = Smax + “、” + Cells(i, s).Value
End If
End If
Next
getnames = Smax
End Function

使用方法:
=getnames(D56,D3:D54,3)共三个参数:
D56是需要查找的分数所在单元格(这里是语文最高分)
D3:D54是被查找的数据区域(这里是语文分数列)
3 是需要返回数据所在的列,这里的3列表示返回“姓名”
如果给定的数据区域中(D3:D54)中含有多个被查找的数(D56),需要在相应列中(3)返回多个数值,那么这些数值将用“、”分隔

http://softbbs.pconline.com.cn/1715400_4.html

 » 本站地址:http://www.gomoth.com

标签: